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Preface 


This manual is one of a series designed to instruct and guide the programmer in the use 
of the SPERRY Operating System/3 (OS/3). It specifically describes screen format 
services (SFS), the interactive component of OS/3 that provides an easy and effective 
method for inputting and outputting data. 


The intended audience is the programmer with a basic knowledge of data processing, 
but with little programming experience. 


This manual is divided as follows: 
= Section 1. Introduction 
- Introduces you to screen formats as an input and output facility for programs. 
~ Describes the capabilities that SFS provides, via the screen format generator 
(SFG) and the screen format coordinator (SFC), for creating and using screen 
formats. 


m™ Section 2. Type Attributes and Editing Rules 


Discusses a variation of COBOL editing rules to be observed when creating your 
own formats. 


mw Section 3. Using the Screen Format Generator (SFG) 
- Explains how to initiate the SFG session. 
- Describes the home screen. 
— Discusses the use of the HELP function. 


- Describes the characteristics screen and the results produced by making 
various specifications on it. 


- Explains the various dialog and optional screens. 
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Section 4. Creating Screen Formats 

Provides detailed instructions for creating your own screen formats. 

Section 5. Modifying Formats 

Explains various methods for changing existing formats. 

section 6. Additional Functions 

Describes the functions that enable you to display and print existing formats and 
format information. Explains the functions that delete formats and terminate the 


SFG session. 


Section 7. Associating Formats with a Program: Using the Screen Format 
Coordinator (SFC) 


- Explains how screen formats become functional with a program through the 


SFC. 


- Discusses job control requirements. 


- Introduces programming requirements related to RPG II, COBOL, FORTRAN IV, 


assembler language, ESCORT, and IMS interfaces. 
Appendix A. Job Control Considerations 
Provides more information about the USE SFS job control statement. Describes the 
job control language statements necessary to use more than one workstation 
(applicable to RPG Il programmers only). 
Appendix B. The 12-Line Screen Display 


Shows the 12-line screen display format for operators using a terminal with 12-line 
capability. 


Appendix C. Function Keys 


Describes the various function keys you can use with screen format services. 


The following publications are referenced in this manual and are either useful or 
necessary to the programmer working with screen format services. 


Consolidated data management macro language user guide/programmer reference, 
UP-9979 


Assembler user guide, UP-8913 


FORTRAN IV programmer reference, UP-88 14 
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= Interactive services commands and facilities user guide/programmer reference, 
UP-9972 


= RPG ll user guide, UP-8067 
# $1974 ANSI COBOL programmer reference, UP-8613 
# Job control user guide, UP-9986 


m™ General editor user guide/programmer reference, UP-9976 
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1. Introduction 


1.1. PROVIDING INFORMATION VIA FORMS 


One of the most common methods of providing and receiving information is through the 
use of forms. Whether we are filling them out, sending them in, or receiving them, 
almost every facet of activity, from recreation to business, involves the use of forms at 
some point. Applying for loans, credit cards, a driver's license; subscribing to 
magazines; preparing tax returns; even writing a check: doing any of these things 
necessitates handling a form. 


Naturally, we take forms for granted and are even annoyed with the frequency at which 

© we are required to handle them. We realize, however, that they provide one of the 
easiest and most effective ways for information to be supplied as well as received. 
They ensure a certain amount of uniformity that is essential whenever a transfer of 
information from one point to another is required. 


How does this concern you? Well, since forms are capable of eliminating wasted time 
and confusion in other environments by standardizing the flow of information, they can 
provide a similar service in the data processing environment too — specifically by taking 
the complexity out of input and output methods. For this purpose, Sperry has designed 
screen formatting facilities. 

1.2. PROVIDING INFORMATION VIA SCREEN FORMAT SERVICES 

Screen format services is an interactive component of OS/3 that enables you to create 
formats (forms), not on paper, but on a video terminal — your workstation. Additionally, 
it provides you with the capabilities for easily maintaining these formats. 

Once created, a format can be used: 

= To input all the necessary data to a program 


= To display output data from a program 


@ = To supply input and display output 
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Inputting and outputting data via a screen format is extremely fast and simple. It is 
done on a fill-in-the-blanks basis. Practically anyone can input data to a program in this 
manner merely by keying in the information that the format requests. For output, the 
blanks of a screen format are automatically filled in with the proper information. Such 
output is easier to read as well as to interpret because it is formatted. 


Figure 1-1 is an example of a screen format used for input purposes. 


VOTER'S REGISTRATION 





a. The format requests information. 













VOTER'S REGISTRATION 
NAME: JOHN DOE | 
ADDRESS:2153 MAIN ST. 
VOTING DISTRICT:WARD 1 
SERIAL NO:944310 PARTY:DEM 
DATE OF ISSUE:AUGUST, 23 1978 
REGISTRAR:MARY SMITH 





PHILA., PA. 









b. The corresponding information is filled in at the 
workstation and is automatically transferred to 
the program as input. 


VOTER'S REGISTRATION 





C. After the program accepts the information as 
input data, the format can be used again. 


Figure 1-1. Screen Format Used to Supply Input Data 
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ry 


Figure 1-2 illustrates a screen format used for output purposes. 





ACCOUNT STATUS REPORT 
ACCOUNT NO: 1827841 DATE:01/93/82 


CREDIT:375.00 
DEFICIT: 250.00 BALANCE:125.00 


a. The screen format displays output. 


ACCOUNT STATUS REPORT 
ACCOUNT NO: 1922640 DATE:01/03/82 
CREDIT:250.00 


DEFICIT: 100.00 BALANCE: 150.00 


b. The format can be used to display output of this type as long as necessary. 





Figure 1-2. Screen Format Used to Display Output Data 





Figure 1-3 illustrates how a screen format can serve both input and output purposes. 


PERSONAL CREDIT REPORT 
NAME: JOHN DOE 
ADDR:1552 MAIN ST. STATE:PA ZIP:19140 
ACCOUNT NO: 193~A564 
BALANCE: 350.900 
PAYMENT: 


a. The format displays information for a particular customer and requests information as well. 


PERSONAL CREDIT REPORT 
NAME: JOHN DOE 
ADDR:224 PINE ST. STATE:PA ZIP: 19102 
ACCOUNT NO:193-A564 
BALANCE: 350.00 
PAYMENT:25.00 DATE: 12/23/82 


The workstation operator changes the customer's address and makes the appropriate 
entries for PAYMENT and DATE. Information on the format is passed to the program. 





Figure 1-3. Screen Format Used for Input and Output (Part 1 of 2) 
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PERSONAL CREDIT REPORT 
NAME:MARY SMITH 
ADDR:1204 MASON AVE. STATE:PA ZIP: 19054 
ACCOUNT NO: 193-B643 
BALANCE:225.00 
PAYMENT: 


c. The format for another customer is then displayed at the workstation. 


Figure 1-3. Screen Format Used for Input and Output (Part 2 of 2) 


You create and use screen formats through the two software elements that make up 
screen format services: the screen format generator and the screen format coordinator. 


The screen format generator (SFG) is the software element that allows you to generate 
screen formats at the workstation. During generation, you specify the layout of each 
format as well as other characteristics that best enable the format to meet the input and 
Output requirements of a particular program. The SFG automatically stores the 
completed formats (as an FC-type module) for you either on a system library (SBYSFMT) 
that resides on the SYSRES volume or on a MIRAM user library on disk or format-label 
diskette that you specify when you create the formats. The SFG makes these formats 
readily available for you to modify, delete, or simply look at whenever necessary. 


The screen format coordinator (SFC) becomes active when you actually want to use an 
existing format with a program. 


The SFC automatically gets the format you request and displays it on the workstation 
screen so that filling in the blanks can begin. The SFC is, as its name implies, 
responsible for coordinating the transfer of input and output data between your program 
and the format that’s displayed on the workstation screen. 
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2 Figure 1-4 illustrates how the SFG and SFC process your formats. 


SFG 





SCREEN FORMATS 
FORMAT ON 


GENERATOR SYSFMT 
(SFG) OR 
USER 
LIBRARY 


(A) Interaction Formats 


between you and the are automatically 
SFG to create, modify, | stored on a library 
delete, or display a file. The SFG can display 
format. any format 

that you wish to 

modify, delete, or 

simply look at. 


SCREEN 
FORMAT APPLICATION 
COORDINATOR PROGRAM 
(SFC) 


The SFC retrieves the requested format The SFC can pass output data from the program 
and displays it on the workstation. A and display it on the requested format at the 
workstation operator fills in the blanks of the workstation. 
format. The SFC passes this information to the 
program. 





Figure 1-4. The Function of the SFG and SFC 
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Together, the SFG and the SFC provide you with everything you need to create, _ 
maintain, and ultimately use screen formats. 


NOTE: 
To be used successfully for screen format services, remote communications terminals 


(the UTS 200 or UTS 400) must have the field protect feature. If this feature is not 
provided, an error message (SF16) will occur whenever the operator enters data. 


1.3. SCREEN FORMAT GENERATOR 


1.3.1. Functions of the SFG 


Let's concentrate on the functions of the SFG: 


SFG 


SCREEN FORMATS 
FORMAT 


GENERATOR 
(SFG) 


LIBRARY 


(A) Interaction 


between you and the are automatically 
SFG to create, modify, stored on a library 
delete, or display a file. The SFG can display 
format. any format 

that you wish to 

modify, delete, or 

simply look at. 
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The SFG lets you create a format, modify (change) a format, display a format, and 
delete a format. With the ease of use characteristic of the SFG, practically anyone can 
perform these tasks - there’s no need to be an experienced computer programmer. 


You begin a format’s creation (generation), for example, by answering a series of 
questions, collectively called the home screen, that are displayed at the workstation 
(see 3.2). You then key in the layout for the desired format. An example of such a 
layout is: 


PERSONAL CREDIT REPORT TYPE: DATE: /_ / 


a; 





There are several steps, or passes, in which you can provide more specific information 
about the format, including whether it will be used for input, output, or both. These 
passes (explained in Section 4) are easy to complete and are generally the same for 
every format, so that after you've created one format, subsequent creations and 
modifications become almost second nature. 


Other SFG functions are even simpler to complete. Before changing a format, for 
example, you might want to examine it to decide exactly what changes need to be 
made. In such cases, the SFG can automatically provide you with a display of any 
format stored on the library file. You need only supply the format’s name. The format’s 
name is likewise the criterion for deleting any format from the library. You supply the 
name, and the SFG does the work. 


The SFG has additional features to make any of the format-related functions, particularly 
creation and modification, even easier to complete. 


a Error Indication 


The SFG automatically notifies you of a variety of mistakes as soon as they are 
made. In most cases, the error is blinked on the workstation screen. In some 
instances, a specific error message is displayed. Thus, you are made aware of and 
can correct certain errors as soon as they occur. 


= Prompting 


If you're not quite sure how to begin creating or modifying a format or if you're 
having difficulty along the way, you can ask the SFG for help simply by pressing a 
particular workstation function key (F13). The SFG then displays the instructions 
necessary to complete the operation causing the difficulty. You can be prompted in 
this fashion through as much or as little of any function (creating a format, 
modifying a format, etc) as necessary. 








UP-9977 SPERRY OS/3 1-8 
SCREEN FORMAT SERVICES 


1.3.2. Screen Format Components 


You now know that the SFG enables you to create, modify, delete, or display a format 
with a minimum of difficulty. Before we begin a more detailed discussion of these 
functions, however, you should know a little more about the nature of the format itself. 


Formats can vary in size and complexity, as shown in the following screens. 


SALES REPORT 
PRODUCT: 


CLASS RANK 


GRADE POINT AVERAGE: ___ 
CLASS RANK: 





WAREHOUSE INVENTORY CONTROL 
PROD. DESC: 
STOCK NO: __ 
MFR: 


QTY ON HAND: 


—_—o oe ee ee 
— a oe oo oe 


No matter how simple or complex, a format consists of only two components: display 
constants and variable data fields. 
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1.3.2.1. Display Constants 


Display constants are portions of a screen format that never vary. For the most part, 
they serve as either headings or titles to introduce the information that will eventually fill 
in the blanks that follow. The shaded portions of the following format are display 
constants. | 7 - oe 





Once a format is displayed on the workstation screen in the first step of its creation, 
you cannot alter display constants in any of the successive steps. To change a display 
constant, you must initiate one of the SFG functions for modifying the format after it’s 
created. : 


Likewise, when a format is being used to input data to or output data from a program, 
a display constant cannot accidentally be changed or blanked out either by the 
workstation operator or by any screen activity that results from the program. The 
program can never reference a display constant. 


Other characters on a format, such as the slashes (/) separating the month, day, and 
year in a date, are also display constants. As a general rule, any character, other than 
an underline, that you enter when you first lay out the format is considered a display 
constant. 


1.3.2.2. Variable Data Fields — 


Those portions of a format that are used either to input data to or to output data from 
a program are variable data fields. When creating a format, you always indicate variable 
data fields by underlines, with the number of underlines representing the external length 
of the field. 


In successive steps during a format’s creation, you make specifications as to the type 
of variable data a field receives (numeric, alphabetic, etc). Once the format is laid out, 
the remainder of the creation process deals exclusively with specifying everything from 
general to detailed characteristics for each variable data field in the format. The field's 
input and output directions are also specified, and since this (inputting and outputting) Is 
the purpose behind generating formats in the first place, we'll discuss I/O directions 
briefly here. 
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Every variable data field must belong to one of three I/O classifications: input, output, 
or both input and output (bidirectional). 


= 8 Input 


Those fields designated during creation as input fields can only be used by the 
workstation operator to enter input data to a program at run time. 


me Output 


Those fields designated during creation as output fields can only be used to display 
Output data from the system at run time. 


Hi Both 


Those fields designated during creation as bidirectional can be used either to input 
data to the program or to display output data from the system at run time. 


The first time a format is displayed (when a program selects the format), input fields are 
(usually) represented with underlines. For example: 


Output fields, on the other hand, always display data. 
NAME: MARY SMITH 


An output field will never be displayed as 


unless the program supplies that field with underline characters. 


A bidirectional field is always expected to receive output the first time a format is 
displayed. In other words, it acts initially as an output field. 


NAME: MARY SMITH 


Depending on the program specifications, a bidirectional field can continue to display 
Output, or it Can accept input, or it can do both. In the preceding field (NAME), the 
workstation operator could, for example, change the last name ‘simply by entering a 
new name over it. 


NAME: MARY JONES 


The program accepts the new name as input. 
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The format shown in Figure 1—1 contains only input fields. The fields in Figure 1-2 
could be either output fields displaying output or bidirectional fields displaying output. In 
Figure 1—3a, the fields NAME, STATE, ZIP, ACCOUNT NO, and BALANCE could be 
either output or bidirectional fields. You can be sure, however, that ADDR is a 
bidirectional field since the address is changed in Figure 1—3b. The fields PAYMENT and 
DATE are strictly input fields. 


The procedure for specifying !/O directions for variable data fields is discussed in 3.5.1. 
NOTE: 


_ Any reference to fields in the remainder of this manual refers to variable data fields 
only. 


1.3.2.3. Protected and Unprotected Parts — Low-Intensity Display 


As you'll recall from 1.3.2.1, once defined, display constants cannot be altered either 
while successive passes of the creation process are being performed or while the 
completed format is being used with a program. These and other parts of a screen 
format with similar characteristics can be described as protected. 


Depending on the particular part, there are differences in the extent to which it is 
protected. Also, in most cases the SFG automatically protects a part simply by virtue of 
tts characteristics. In some cases, however, you can specify the protection yourself. 


w Display Constants 


Display constants are automatically protected as soon as you finish laying out the 
format. They remain so throughout the rest of the format’s creation and also 
throughout any subsequent use of the format with a program until the entire format 
display is erased. Display constants are therefore totally protected and can only be 
changed via one of the SFG’s modification functions. 


= Output Fields 


As explained in 1.3.2.2, a field that is specified for output during a format’s 
creation is used exclusively to display variable data from the system. Displayed 
output data cannot be changed or erased by the workstation operator. Only new 
output coming from the system can overwrite previously displayed output. 
Naturally, output will be erased whenever the entire screen display is erased. It is in 
this sense that output fields are automatically protected. 


=  #Specific Characters Used for Editing Input or Bidirectional Fields 


At a certain point during creation of the format, you can specify editing for certain 
variable data fields by keying in COBOL-like picture clauses. If editing is specified 
for an input or bidirectional field, you have the option of specifying protection for 
certain characters in the picture string: the comma ({,) and the decimal point (.). The 
SFG automatically protects a fixed currency symbol ($). These characters become a 
sort of edit mask and, because they are protected, cannot be altered by a 
workstation operator or by the activity of the system. 
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Although you should know what protection means, it isn’t necessary for you to 
memorize which parts of a screen format are protected stnce the SFG makes the 
distinction. Protected parts are displayed on the workstation in low intensity. 
Low-intensity display simply means that the protected parts (characters) appear less 
bright than those that are unprotected. 


NOTE: 

During the creation or modification functions, there are several forms displayed by the 
SFG (the home screen, for example) the answers to which provide certain information 
about the format. Although not physically related to the format layout, portions of these 
displays are also protected and are displayed in low intensity. 


1.4. SCREEN FORMAT COORDINATOR (SFC) 


As mentioned earlier, the SFC becomes active when you want to use an existing format 
with a particular program for the purpose of inputting and outputting. 


SFG 


= oe eee ee eee ee eee ee eee ee eee ee eee ee eee wre eee eee ee eee ee ee ee ee ee ee ee ee ee ee ee eee eee ee ee es 









SCREEN 
FORMAT 
COORDINATOR 
(SFC) 










APPLICATION 
PROGRAM 





The SFC retrieves the requested format The SFC can pass output data from the program 
and displays it on the workstation. A and display it on the requested format at the 


workstation operator fills in the blanks of the workstation. 
format. The SFC passes this information to the 
program. 





— 
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The SFC is responsible for retrieving the format (F-type module in $Y$FMT or your user 
library) you requested and displaying it on the workstation screen. Since the format is 
completely separate from your program, the SFC must also coordinate the flow of data 
between the program and the format. 


In addition to transferring data back and forth, the SFC performs other necessary 
operations, such as checking or validating any input data that is filled in by the 
workstation operator. The data is checked against the specifications that you made for 
the field when you created or modified the format. 


As will be explained in Section 4, there is a specific pass, or step, in the format’s 
creation (for example, pass 2 - type attribute screen) where you indicate whether the 
field is to receive numeric, alphanumeric, or alphabetic data. If a field does not receive 
this type of data, the SFC will not accept the data as input to the program. Incorrect 
input is blinked on the workstation screen. 


Since the SFC performs these and similar operations automatically, there's no need for 
you to be concerned with its activities at any time during the format’s use. Simply be 
aware that the SFC handles the format according to the specifications you made during 
creation or modification via the SFG. 


Although the SFC assumes the bulk of the responsibility for handling program input and 
output, you are responsible for such things as the proper job control statements 
associated with screen format services and for identifying as well as calling that format 
within the program. Specifics concerning job control statements and the necessary 
program statements as they relate to the particular language being used are discussed 
in Section 7. 
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2. Type Attributes and Editing Rules 


2.1. CONSIDERATIONS FOR VARIABLE DATA FIELDS 


As mentioned in 1.3.2.2, when you create a format, you specify variable data fields to 
handle the program's input and output data. In a specific step during the format’s 
creation, you must define the type of data that each field is to receive. Data for variable 
fields can be in one of the following types: alphabetic, numeric, or alphanumeric. These 
are referred to as field type attributes. 


With the SFG, you have the option of specifying editing for numeric fields and, to some 

extent, for alphabetic and alphanumeric fields as well. Since editing can be specified 
@ during creation of the format, your program has only to indicate such things as 

assumed decimal places (v) and signs (s) whenever appropriate, but not edit masks. 


In Section 4, we'll discuss specifying type attributes and editing characters when 
creating a screen format. However, knowing the rules for type attributes and editing 
beforehand can be helpful. 


2.2. TYPE ATTRIBUTES 


The rules for indicating field types are similar to the rules applying to COBOL picture 
clause expressions: 


= §€=«Alphabetic Fields 
You use one or more A's to indicate that a particular field will receive alphabetic 


data when the format is in use. However, duplication factors (as A(2) in COBOL to 
indicate an alphabetic field that is two characters in length) are not supported. 


A field defined as alphabetic can, at run time, contain any combination of the 26 
characters of the alphabet and the space. These characters will be left-justified with 
blank padding. 
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= Numeric Fields 


You use one or more Qs to indicate that a format field can receive numeric data. 
Duplication factors are not supported. A field defined as numeric can, at run time, 
contain any combination of the numeric characters O through 9. A field of this type 
will be right-justified with zero padding. 


= Alphanumeric Fields 


You can use any combination of Xs, As, or 9s to represent an alphanumeric field. 
Duplication factors are not supported. The positions indicated by Xs can, at run 
time, contain any combination of EBCDIC characters. Positions indicated by 9s or 
As can only contain the numbers O through 9 and alphabetic characters 
respectively. A field defined as alphanumeric will be left-justified with blank 
padding. 


2.3. EDITING 


Once you decide whether a field is to be alphabetic, alphanumeric, or numeric, your next 
consideration is whether you want to edit the field. Editing can be specified for any field 
in the format, although in some cases certain types of editing and edit characters 
restrict the field to handling output data only. 


2.3.1. Editing Alphabetic and Alphanumeric Fields 


You may use an exclamation point (!) to edit alphabetic and aiphanumeric fields as 
shown in the following examples. 


AAA! AAA 
XX!XX!XX 
XX!O9IAA 


This character reserves the position where it appears so that an insertion character that 
you select (such as a dash or a slash) can replace it. Positions indicated by the 
exclamation point are always protected and are never counted in the field's internal 
length. A field edited in this manner may be used for input, output, or both. 


You may use the characters O (zero) and B in an alphanumeric field as shown in the 
following examples. | 


XXBXXOOXX 
99OBBX@AA 


These characters reserve the positions where the numeral O and the space will be 
automatically inserted at run time. An alphanumeric field using either of these two 
characters may not use the exclamation point and vice versa. Also, such a field may be 
used only to display output data. The O and the B are counted in the external but not 
the internal field length. 
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NOTE: 


External field length refers to the appearance of the field on the workstation screen, 
whereas internal length refers to the length of the field when referenced by the user 
program. 


2.3.2. Editing Numeric Fields 


You can edit a numeric field by using an exclamation point (!), insertion characters, or 
suppression. 


The exclamation point gives you the same capabilities for numeric fields as it does for 
alphabetic and alphanumeric fields. A numeric field using the exclamation point may not, 
however, use any other form of editing and vice versa. Other SFG editing rules are 
similar in most aspects to COBOL editing rules. 


The valid characters you can use for insertion or suppression editing are: asterisk (*), Z, 
plus sign (+), minus sign (-), CR, DB, decimal point (.), comma (,), blank (B), zero (O), 
and currency sign ($). 


You have the capability to move underlines (_) to numeric I/O fields on the screen. This 
will enable the operator to enter data directly without clearing the field of zeroes. User 
programs will not receive SF11 (USER IMPERATIVE ABNORMALLY TERMINATED) 
errors if the original data displayed contains underlines. 


= §«Insertion Editing 


There are three types of insertion editing that you can specify during format 
generation: simple, fixed, and floating. 


- Simple Insertion 


You may insert the comma (,), the blank (B), and zero (0) into any numeric field 
as shown in the following examples. 


9,999 
9BB99900 


The comma may be used in an input, output, or bidirectional field. Fields using 
the B or O are always output fields. 


— Fixed Insertion 


You may insert the currency sign ($), plus sign (+), minus sign (-), credit 
symbol (CR), debit symbol (DB), comma (,), and decimal point (.) into any 
numeric field as shown in the following examples. 


$9,999.99 
+9.99 
9,999 .99CR 


Fields using CR or DB are always output fields. 
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- Floating Insertion 


You may express the currency sign ($), plus sign (+), and minus sign (-) as 
floating signs as shown in the following examples. 


$$$9 .99 
4+999 


The sign represents the leftmost position (before the first significant digit) into 
which it ($, +, or —) will be inserted. A field edited in this manner may not use 
the CR or DB symbols and may only be used for output. 


m= $ Suppression/Replacement Editing 
You may do this type of editing in one of the following ways: 


~ The character Z represents the suppression of leading zeroes (up to the first 
significant digit) for output only fields and their replacement with blanks as 
shown in the following examples. 


272,229 
$2,229.99 


— The Z represents the suppression of leading zeroes (up to the first significant 
digit) for bidirectional fields and their replacement with the _ (e.g., — — — — 
1.23). This allows you to see where any additional digits are entered. 


~ The asterisk (*) represents the suppression of leading zeroes (up to the first 
significant digit) for output only fields and their replacement with the * (e.g.,"* 
9.99). 


An edited field cannot use the CR or DB symbols and can only be used for output. 
To use zero suppression on a bidirectional field, do not protect the punctuation 
because zeroes appear instead of underlines. 


Refer to the 1974 ANSI COBOL programmer reference for more information concerning 
insertion and suppression/replacement editing for numeric fields. 


2.4. RESULTS OF EDITING FORMAT FIELDS 


You define type attributes and editing for variable data fields in pass 2 of the format’s 
generation (see 4.1.2). In a later step (dialog screen 1, 3.5.1), you specify the 
characters to replace any exclamation points in a field, and optionally you can specify 
protection for certain characters in edited numeric fields (that are input or bidirectional), 
thus creating an edit mask. 


Editing affects the display of a field when the format is presented at the workstation 
and consequently the way in which data can be entered (for input and bidirectional 
fields) by the workstation operator. Editing also affects the field's internal length, and in 
some cases it restricts a field to handling output data only. 


ie sts FR ah Din a da nha 





UP-9977 SPERRY OS/3 2-5 
SCREEN FORMAT SERVICES 





How editing determines the workstation display and operator entries is especially 
obvious with edited numeric fields that are used for input. 


Assume that during the format’s creation a numeric input field is described as follows: 
$9,999.99 


Since the SFG automatically protects a fixed currency sign, the field will be displayed as 
follows when the format is presented at the workstation: 


— a ee ee ee ee 


As long as the program indicates the number of decimal positions (two in this case), 
the workstation operator can make entries similar to any one of the following: 


$1,234.56 
$1.23. 
$1234.56_ 
$1234 


Decimal point alignment is done automatically (by the SFC). If no decimal point is 
entered (e.g., $1234), it is assumed to be to the right of the rightmost digit ($1234. ). 


Errors are indicated by blinking if the workstation operator makes an incorrect entry, 
such as: 


$123456__ 


The entry is in error because only four digits to the left of the decimal point are 
permitted (as indicated by the editing specified during the format’s creation and the 
number of decimal places provided for in the program). If the workstation operator 
enters too many digits to the right of the decimal point (e.g., $123.456), the value is 
accepted but the last digit (6) is truncated. 


Suppose you want this field to be displayed on the workstation as follows: 


- a ee ee 
In this case, you perform the same editing ($9,999.99), but in addition you specify 
protection for the comma and the decimal point. The workstation operator must then 


enter the value in its proper position according to the field display. If the value is 1.23, 
the operator enters: | 


$0,001.23. 
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Now consider format fields that use the sign +, -, CR, or DB. If you describe an input 
field as +999 or -999 during format generation, it will appear as —. _. _. __ when the 
format is displayed at the workstation. As long as the program indicates a sign for this 
field (e.g., S999 as in COBOL), the workstation operator can enter any 3-digit value 
with or without a sign. For example: 


+123 
-123 
125°. 


The value with no sign is assumed to be positive. 


For output fields using a sign, the (COBOL) rules in Table 2-1 apply. 


Table 2-1. Editing Rules for Signed Output Fields 


If the Field And the Output Then the Output Is 
Is Defined with Value Is Displayed on the Format 
with 


+ (+999) Positive or zero + (+ 123) 
Negative ~ (-123) 
Positive or zero Space ( 123) 
Negative ~ (-123) 
R 


CR (999CR) Positive Two spaces (123 ) 
Negative C (123CR) 

DB (999DB) Positive or zero Two spaces (123 ) 
Negative DB (123DB) 


Fields that use the exclamation point (!) for editing are displayed on the format with 
whatever character you choose to replace the exclamation point with. Assume that you 
define the following field during the format’s generation (pass 2). 





SOCIAL SECURITY:999!199!19999 


Later on during generation, you select a dash (-) to replace the exclamation point. If the 
field is used for input, it will be displayed as follows: | 


SOCIAL SECURITY: ___- 
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® The operator can make the appropriate entries. If the field is used for output, it displays 
the data that is passed from your program to the format. For example: 


SOCIAL SECURITY: 195-44-8867 


Remember that edit characters used for simple or fixed insertion (such as B, O, $,+,- 
CR, DB, !, and ,) are never counted in the field’s internal length. Also, fields containing 
any acceptable combination of the floating signs $, +, or -; the insertion characters CR 
or DB; or the suppression/replacement characters * or Z may only be used to display 
output data. 


Table 2-2 lists some editing examples and the effects of that editing on the format 
fields. 


Table 2-2. Editing Examples 


Type Attributes 
Field Type and External Internal Field Display 
Editing Specified Length Length* 


Alphabetic INPUT:_ __ 
OUTPUT: ABC 


AAAIAAA 


OUTPUT : ABC-DEF 


© (if dash is selected 
for replacement) 


Alphanumeric INPUT: _ _ — 
OUTPUT: #1A 


XXISSIAA INPUT:_ _-_ _ 
OUTPUT: #1 23- AB 
(if dash is selected 
for replacement) 


XXB9S00XX OUTPUT ;ONLY:A3 4500BC 


Numeric INPUT: _ _ 
OUTPUT: 123 


99199199 INPUT: ./-_/-- 
OUTPUT: 12/24/80 


(if slash is selected - 
for replacement) 


$9,999.99 INPUT:$_.--_-__2—/T- 
or {if , and . are protected) 
INPUT 2 $.2,2:.2.u = 
OUTPUT :$1,234.56 


ZZ9.99 OUTPUT ONLY: 123.45 
or 
12.34 


| , OUTPUT ONLY:$12.34 
@ 7 
— $1.23 


“Internal lengths indicated are based on the internal usage of display. 
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3. Using the Screen Format 
Generator (SFG) 


3.1. ACTIVATING THE SFG 


The first thing you must do to perform any of the SFG functions is activate the SFG. Do 
this on the workstation: 


1. Log onto the system following the procedures outlined in the interactive services 
commands and _ facilities user guide/programmer reference, UP-9972 (current 
version). 


2. Press the XMIT key. 


3. Get into system mode by pressing the FUNCTION key and (while holding it down) 
pressing the SYS MODE key. 


4. Key in RV SFGEN. 






RV SFGEN 


5. Press the XMIT key. 


A formatted display called the home screen then appears on the workstation screen. 
The home screen is like a fill-in-the-blanks form: you enter the function you want to 
perform, as well as information about your screen format. 
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3.2. THE HOME SCREEN 


The home screen (Figure 3-1) is always the first display presented whenever you 
activate the SFG. On it, you choose one of the eight SFG functions. If you're working on 
a format that already exists, you provide its name and library. If you're creating a new 
format, you name it, indicate where it will be stored, and, if necessary, allocate file 
space for it. 


Function ; 1 CREATE 2 CREATE-FROM 3 MODIFY 4 DELETE 


Ve 

2: 5 SHOW 6 LIST 7 SPOOL 8 TERMINATE 
3. 

4. Old Format: Format name: 

5. is in library: File name: (SYSFMT 

6. Volume: CRES 

Te 

8. 

9. New format: Format name: 

10. stored in library: File name: (SYSFMT 

11. Volume: (RES 

12. File does not exist: Allocate: (902) cylinders 

13. Increment: (01) cylinders 

14. 

15. 

16. 

. @ 
18. *Function keys are: F1 - GO TO HOME SCREEN F5 - BREAKPOINT SPOOL FILE 
19. F13 - HELP F14 - EXIT HELP 

20. F2@ - RESTORE SCREEN 

21. 

22. 

23. 

24. 





Figure 3-1. The Home Screen 


Subsection 3.6 discusses how to position the cursor and how to overwrite values on 
the screen. 
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3.2.1. Functions Provided by the SFG 


On line 1 of the home screen, you specify one of the eight functions provided by the 
SFG: 


FUNCTION (1): 1 CREATE 2 CREATE-FROM 5 MODIFY 4 DELETE 
5 SHOW 6 LIST 7 SPOOL 8 TERMINATE 


mw CREATE 


Use this function to create a screen format. The first step is to complete and 
transmit the home screen. The SFG then displays another fill-in-the-blanks screen 
called the characteristics screen. This screen asks you for format-related 
information and offers several options. Some of these options have other screens 
associated with them. If you choose these particular options, their optional screens 
are also displayed. 


Once you've provided all the necessary information about your format, a blank 
screen is displayed for you to lay out your screen format. You supply any display 
constants and indicate any variable fields and their lengths. In two subsequent 


passes, you assign type (editing) attributes and input/output usages for each field 
on the format. 


You also have the option of providing more information for each field in the format 
by initiating dialogs for those fields. Once your format is complete and transmitted, 
the home screen is displayed for you to choose another function. 


= CREATE-FROM 


Use this function to create a new format by modifying an existing format. You can 
change the format as a whole, or you can change specifications on some or all of 
the fields in the format. The SFG saves the old format. 


=» MODIFY 


Use this function basically as you use the CREATE-FROM function. The only 


difference is that the SFG doesn’t save the old format. The new format replaces 
the old format. 


m DELETE 
Use this function to delete an existing format. 


gs SHOW 


Use this function to display an existing format and its type attributes on the 
workstation screen. 





UP-9977 SPERRY OS/3 3-4 
SCREEN FORMAT SERVICES Update B 


a LIST 


Use this function to display information for each field within an existing format. The 
display includes such information as the creation date, the location of the fields on 
the screen format (x,y coordinates), input/output usage of the fields, internal and 
external field lengths, range checking and replenishing values, and conditional 
indicators associated with the field. 


m= SPOOL 
Use this function to get a printout of an existing screen format, along with the field 
information provided by the LIST function. Because ail printers do not support 
lowercase letters, the SPOOL function provides an option to translate lowercase to 
uppercase. This message appears after you select the SPOOL option: 
Would you Like the constants to be translated to uppercase before 


the format is spooled? 
(1) 1 NO 2 YES 


The parentheses indicate that value 1 is the default value for this question. If you 
accept the default, lowercase alphabetic characters are translated to uppercase. 


a TERMINATE 


Use this function to terminate the SFG session and return control to the system. 


3.2.2. New Format Name and Library 


Every screen format must have a name and library. When you're creating a format, 
name it and indicate where it will be stored via lines 9, 10, and 11 of the home screen: 


New format: Format name:( | ) 
stored in Library: File name: (SYSFMT ) 
Volume: CRES ) 


Line 9 asks for the format name. The name can be eight characters and can contain 
only the letters A to Z, the numerals O to 9, and the special characters *‘ # $ @ and ?. 


Spaces are not allowed within the name. 


Lines 10 and 11 ask for the library where the format will be stored. $Y$FMT is a 
system file for storing formats; it is the default for FILE NAME. $Y$FMT resides on the 
system resident volume (RES). Thus, RES is the default for VOLUME. If you choose the 
defaults, no keyin is required. You're ready to transmit the home screen. You can, 
however, store your format on an alternate MIRAM library. To do so, overwrite 
SYS$FMT and RES with the appropriate file name and volume name. 
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If the alternate file you specify doesn’t exist (hasn't been allocated), allocate space for it 
on the volume. Line 12 asks about the file space you need: 


File does not exist: Allocate: (0@2) cylinders 
Increment: (01) cylinders 


If you need more than two cylinders for your file, overwrite the OO2 (the default) with 
the number you need. The same applies for INCREMENT, which is the number of extra 
cylinders added to your file each time the file fills up. 


The CREATE function isn't the only function that requires a new format name. The 
CREATE-FROM function also needs a new name because you're creating a whole new 
format based on the characteristics of an old one. The old format itself does not 
change, nor does its name. 


3.2.3. Old Format Name and Library 


The functions that require the old format name and library are: 


CREATE-FROM SHOW 
MODIFY LIST 
DELETE SPOOL 


On lines 4, 5 and 6, enter the name and library of the format you want to work with. If 
the format is stored on $Y$FMT, no further keyin is required. Just transmit the home 
screen. If the format is stored on some other library, enter the file name and volume 
where the format is located and then transmit the home screen. 


NOTES: 


1. To get a listing of existing format names, issue the FSTATUS command. For an 
explanation of this command and accompanying parameters, refer to the interactive 
services concepts and facilities user guide/programmer reference, UP-9972 (current 
version). 


2. The Screen Format Generator may not be used to copy formats from one file on a 
diskette to the same file or to another file on that same diskette. 
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3.3. THE CHARACTERISTICS SCREEN 


When you're creating a new format, the next screen displayed after the home screen is 
the characteristics screen. This screen (Figure 3-2) asks for more information about 
your format. 


ON OU SF WN a 







SPECIFY THE GLOBAL CHARACTERISTICS FOR FORMAT XXXxXXXXXxx: 


Error retry count: (02) 
Alphabet: (ENGLISH ) 






Lower case translation? YES 2 NO 









Screen format is (1): 1 ORIGINAL 2 OVERLAY 














Screen erase/unlock option (1): 1 NONE 2 REPLENISH 
3 ERASE 4 UNLOCK KEYBOARD 
CONDITIONAL INDICATOR 







Transmit all-disregard cursor position? (1): 1 NO 2 YES 





Special editing characters? (1): 1 NO 2 YES 
Special display control? (1): 1 NO 2 YES 












Error message field to be defined? (1): 1 NO 2 YES 
Display retention on all fields? (1): 1 NO 2 YES 
Function command keys to be defined? C1) 1 NO 2 YES 







Format has a non-displayed constant? (1): 1 NO 2 YES 


Figure 3-2. The Characteristics Screen 


Some selections on the characteristics screen prompt additional screens. These are 
called optional screens and are discussed in 3.4. Optional screens further define certain 
run-time characteristics of your format. They automatically appear in sequence after you 
complete and transmit the characteristics screen. 


Note that the first line of the characteristics screen always contains the format name 
you supplied on the home screen: 


GLOBAL CHARACTERISTICS FOR FORMAT xxxxxxxx: 


where xxxxxxxx is the 8-character name of your format. 











UP-9977 SPERRY OS/3 3-7 
SCREEN FORMAT SERVICES 


3.3.1. Error Retry Counts (Line 3) 


Your answer to this question determines the number of times a workstation operator 
may attempt to correct any input that is entered incorrectly. 


ERROR RETRY COUNT: (02) 


The value 2 is the default value for the number of times correction may be attempted. 
However, you may specify any value up to 99 by overwriting the default. If you specify 
O, the operator can't perform a retry. 


At run time, incorrect input is blinked (or displayed with the display attributes you select 
for fields entered in error) to the workstation operator. If the operator can't correct the 
input and the value specified for the retry count is reached, then an error status is 
returned to your program. You may make provisions within your program for this 
situation. 


3.3.2. Alphabet (Line 4) 
If you're creating (CREATE or CREATE-FROM) or modifying (MODIFY) a format, line 4 
lets you indicate whether input provided by a workstation operator at run time is in a 


language other than English: 


ALPHABET: (ENGLISH_) 


English is the default alphabet. Appendix D lists the other valid alphabets for which 
translation tables are available. | 


3.3.3. Lowercase Translation (Line 6) 


Line 6 asks you to specify whether lowercase alphabetic characters, entered by the 
workstation operator for the format’s variable data fields, will be translated to 
uppercase before being passed as input to your program. 


LOWER CASE TRANSLATION? (1): 1 YES 2 NO 


As indicated by the parentheses, the default value for the question is 1 (YES). If you 
accept the default, lowercase alphabetic characters provided as input by a workstation 
operator are translated to uppercase before they are passed to the program. If you 
select 2 (NO), lowercase alphabetic characters aren't translated to uppercase. 


NOTE: 


No lowercase translation may be performed on Katakana workstations; therefore, you 
must overwrite the default value with 2 (NO), specifying no lowercase translation. 
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3.3.4. Original and Overlay Formats (Line 8) 


An original format is simply the average screen format whose purpose is inputting and 
outputting information to and from your program. An overlay format serves the same 
general purpose. However, it is created for use with an original format. Your response 
to this part of line 8 indicates whether the format you're creating or modifying is an 
overlay or an original. 


SCREEN FORMAT IS (1): 1 ORIGINAL 2 OVERLAY 


An overlay format is created separately and may begin with a start-of-entry character 
(SOE), even those beginning in position (1,1). During format generation passes 2 and 3, 
the first line is shifted to the left one character, and the SOE character disappears. The 
screen is generated as specified in pass 1 with the SOE character, and no attempt 
should be made to shift back the incorrect line. 


When selected by your program, the overlay format completely replaces (overlays) a 
portion of, or acts as an addition to, the original format that is already displayed. At this 
time, only the overlay is used for inputting or outputting because it’s the only format 
recognized. The original format remains unchanged and exists only for display purposes. 
Creation of an overlay format and specific examples of its use are discussed in 4.3. 


3.3.5. Erasing and Unlocking Options (Lines 10, 11, and 12) 


When your program first displays a format on a screen, output-only and bidirectional 
fields contain data from your program, and input fields are ready to be filled in. When a 
workstation operator completes the format and transmits it back to your program, the 
next thing that occurs depends on the erase/uniock option you specified when you 
created the format. Your choices are displayed on lines 10, 11 and 12 of the 
characteristics screen: 


Screen erase/unlock option (1): 1 NONE 2 REPLENISH 
3 ERASE 4 UNLOCK KEYBOARD 
5 CONDITIONAL INDICATOR 


= NONE 


This ts the default option. It indicates that when a workstation operator transmits a 
format, the SFC verifies the input data. When verification is completed, the screen 
format itself remains on the workstation screen and the keyboard remains locked 
until your program requests the display of the same or a new format. This option 
offers you the most flexibility, in that your format isn’t redisplayed automatically. If 
you intend to use conditional indicators to control your format’s run-time 
characteristics (discussed later in this section), specify either this option or the 
CONDITIONAL INDICATOR IN USER PROGRAM option. 
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m REPLENISH SCREEN 


This option indicates that when a workstation operator transmits a format the SFC 
verifies the input data. Then, if verification is successful, the SFC immediately 
replenishes the input-only fields with a stringed constant (normally underlines) 
without waiting for your program to actually accept the input. The keyboard is then 
unlocked. Thus, a workstation operator can begin filling out another screen of data 
without waiting for your program to process the previous input data. This option is 
designed specifically for data entry applications that simply gather information from 
one format with a minimum of input verification. The formats should contain only 
input fields and should rely only on the verification that the SFC can perform. 


m@ ERASE SCREEN 


This option indicates that after your program displays a format and an operator 
transmits the contents back to your program, the format is erased and the 
keyboard is unlocked. This option is recommended for applications that only 
intermittently use screen formats. It is not recommended for continuous data entry 
applications because there is no looping back to redisplay a format. 


gm UNLOCK KEYBOARD 


This option indicates that when an operator transmits a format, the SFC verifies the 
data, leaves the keyboard unlocked, and immediately allows a workstation operator 
to enter new data. It doesn’t wait for your program to accept the input before it 
allows an operator to enter the next screen of data. In this respect, it resembles 
the REPLENISH SCREEN option. The difference between the two is that UNLOCK 
KEYBOARD doesn't replenish input fields with a stringed constant (typically 
underlines). Instead, it leaves the screen display as is, where input fields contain the 
previously entered data. All a workstation operator has to do is overwrite the old 
contents of the field with new data. Like REPLENISH SCREEN, this option is 
recommended for data entry applications where formats contain only input fields 
that require a minimum of verification. 


m» CONDITIONAL INDICATOR IN USER PROGRAM 


This option lets you set conditional indicators that determine your format’s status. 
Depending on the conditions you specify and test for in your program, the input 
fields are replenished, the entire format is redisplayed, or the whole format is 
erased. You supply conditional erase/replenish indicators on an optional screen 
called the conditional erase/replenish screen. This screen (as well as any other 
applicable optional screens) appears after you complete and transmit the 
characteristics screen. For an explanation of the conditional erase/replenish screen, 
see 3.4.2. 
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A user program may erase the screen format or replenish input values by issuing explicit 
statements (e.g., a BAL programmer would use consolidated data management macros). 
The keyboard may also be unlocked this way. NONE or UNLOCK KEYBOARD should be 
chosen in this case. See 7.3.4 and the consolidated data management macro language 
user guide/programmer reference for the data management macros that can be used for 
screen control. 

NOTE: 

Do not specify REPLENISH SCREEN, ERASE SCREEN, or UNLOCK KEYBOARD if you 
intend to use range checking for any field in your format. 


3.3.6. Transmit All-Disregard Cursor Position (Line 14) 


If YES is chosen, all input will be returned to the user program displayed on the screen, 
regardless of where the cursor is positioned. 


Transmit all-disregard cursor position? (1): 1 NO 2 YES 


3.3.7. Special Editing Characters (Line 16) 
This line asks if you'll use special editing characters for numeric edited fields: 


Special editing characters? (1): 1 NO 2 YES 


lf you specify YES, an optional screen called the edit screen appears after you've 
transmitted the characteristics screen. The edit screen is discussed in 3.4.3. 
3.3.8. Special Display Control (Line 17) 


Line 17 asks if you want to change the display properties of the different types of fields 
in your format: 


Special display control? (1): 1NO 2 YES 


If you choose YES, you prompt the display of an optional screen called the special 
display screen (3.4.4). On the special display screen, you can indicate the intensity and 
emphasis for display constants, input and output fields, and fields where an operator 
has made an error. If you accept the default, NO, the default display properties are: 

m Low intensity and no emphasis for display constants and output fields 

= Normal intensity and no emphasis for input fields 


= Normal intensity and blinking for fields in error 
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3.3.9. Error Message Field (Line 19) 


You have the option of specifying where error messages from your program are 
displayed on your format, under what conditions they should appear, and how they look 
when they are displayed. To request an error message field, respond to line 19 of the 
characteristics screen: 


Error message field to be defined? (1): 1NO 2 YES 


lf you answer (2) YES, you prompt the display of the optional error message screen 
(3.4.5.) 


3.3.10. Display Retention (Line 20) 


Line 20 lets you request conditional display retention for your format. Conditional 
display retention means that, under certain circumstances, the contents of all variable 
data fields remain displayed on the screen after a workstation operator transmits the 
format. Input fields aren't replenished with underlines (or other stringed constant); 
instead, they retain the values the workstation operator keyed in. Similarly, output and 
bidirectional fields don’t receive new values from your program. The only thing the SFC 
actually sends out to your format is the field display attributes (i.e., the intensity and 
emphasis). Conditional display retention has various uses that are discussed in detail in 
3.4.6. To request display retention for your format, respond to line 20 of the 
characteristics screen: 


Display retention on all fields? (1): 1NO 2 YES 


By responding with 2 (YES), you prompt the display of an optional screen called the 
display retention screen (3.4.6). 


3.3.11. Function Keys (Line 21) 

You can assign your own functions or commands to function keys 1 through 22 on the 
keyboard. At run time, an operator simply presses the appropriate keys to execute the 
function you've assigned to it in your program. By replying (2) YES to line 21 of the 


characteristics screen, 


Function or command keys to be defined? (1): 1NO 2 YES 


you prompt the display of the function/command key screen (3.4.7), where you select 
the keys you want to use, along with their run—time indicators. 


You have the capability to have one response indicator set by more than one function 
key. In fact, any combination of function keys and response indicators can be specified. 


NOTE: 


When executing SFG from the UNISCOPE 400, you may not request function key 
specification. 
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3.3.12. Nondisplayed Field (Line 23) 


Each format is allowed one field that communicates with your program but never 
appears on the workstation screen. When you enter 2 (YES) on line 23 of the 
characteristics screen, 


Format has a non-displayed constant? (1): 1NO 2 YES 


you prompt the display of the nondisplay screen (3.4.8), where you specify how the 
field will be used. 


3.4. OPTIONAL SCREENS 


There are seven optional screens associated with the characteristics screen. Each one 
gives you additional control over some run-time feature of your format. 


The selections from the characteristics screen that prompt optional screens are listed in 
Table 3—1 and discussed in the following paragraphs. Note that whatever you specify 
on an optional screen affects every field in your format at run time. Some of the 
functions that optional screens provide, however, can be specified at the field level via a 
dialog screen. (Dialog screens are discussed in 3.5.) For example, you can specify 
display retention at the screen level as well as at the field level. However, at run time, 
your field level specification always overrides what you specify at the format level. For 
easy reference, the dialog screens that correspond to optional screens are also listed in 
Table 3-1. 


Table 3-1. Characteristics Screen, Related Optional Screens, and Related Dialog Screens 


Selection from Resulting Corresponding 
Characteristics Screen Optional Screen Dialog Screen 


SCREEN ERASE/UNLOCK OPTION (5): Conditional erase/ 
CONDITIONAL INDICATOR IN replenish screen 
USER PROGRAM 


SPECIAL EDITING CHARACTERS? 
(2): YES 
SPECIAL DISPLAY CONTROL? (2): Special display screen 
YES 
ERROR MESSAGE FIELD TO BE Error message screen 
DEFINED? (2): YES 
DISPLAY RETENTION ON ALL Display retention screen Dialog screen 5 
FIELDS? (2): YES 
FUNCTION COMMAND KEYS TO Function command/key 
BE DEFINED? (2): YES screen 
FORMAT HAS A NON-DISPLAYED Nondisplay screen 
CONSTANT? (2): YES 


















Dialog screen 2 


Dialog screen 4 
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If you request any optional screens, they automatically appear, in the order discussed in 
the following subsections, after you transmit the characteristics screen. Once you 
complete and transmit the optional screens you requested, you're presented with a 
blank screen for laying out your format (pass 1, 4.1.1). 


Some general rules to keep in mind when working on optional screens are: 


1. If you change your mind about using an optional screen but the screen has already 
come up on your workstation, just transmit the screen without entering anything on 
it. The SFG then accepts the default values for that option. 


2. You must correct all errors (indicated by blinking or message) before you can 
successfully transmit an optional screen. To ignore warning messages, position the 
cursor at the end of the screen and press the transmit key. 


3. You can initiate the HELP function at any point. 


4. Rules concerning the position of the cursor are the same for optional screens as for 
the home screen (3.6.) 


Many optional screens, as well as many dialog screens, require conditional indicators. 
Before we discuss optional screens, it will help you to understand what these indicators 
do. 


3.4.1. Conditional Indicators 


Conditional indicators are a means of conditionally controlling certain run-time features 
of your format. In your program, you define a set of conditions under which you want a 
particular feature of your format (or a single field) to change. To each condition, you 
assign a number that serves as an indicator. You enter this indicator number on the 
optional screen or dialog screen associated with the feature you want to control. At run 
time, your program tests to see if that condition is true. If it is, it turns on the indicator. 
The indicator acts as a flag to the SFC, telling it to alter that feature of the format or 
field. 


You can associate a single indicator with more than one optional or dialog screen. That 
is, One indicator number can control several different run-time features of your format. 
For example, a single indicator can cause your program to display an error message, 
highlight a field in error, and even protect the other fields that an operator entered 
correctly. 
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There are four ways of specifying how an indicator should work: 


(Y nnn) syntax 


This is how the indicator is normally used. The Y implies that some action is taken 
when a condition is true and your program turns an indicator on. 


(N nnn) syntax 


By overwriting the Y with an N (the Y is not protected), you specify that some 
action is taken only when an indicator is off (that is, only when the condition in 
your program is false). 


(Y OOO) syntax 


By entering zeros instead of a number or by leaving the indicator field blank, you 
set up an unconditional indicator. It means that some action (like display retention) 
always applies. (in effect, the condition is always true.) 


(N OOO) syntax 


This, too, is an unconditional indicator. It means that some action (again, like 
display retention) never applies. (The condition is always false.) You can achieve 
the same effect by leaving the field blank, rather than filling in zeros. 


Use of the unconditional syntax is sometimes discouraged or redundant, depending on 
the application. Where this is true, it is noted in the following discussions of optional 
screens and dialog screens. 


The fields for the indicator numbers that appear on optional and dialog screens are 
three character spaces long. If your indicator is less than three characters, you still enter 
the first number at the first character slot. For example, you enter indicators 1, 12, and 
123 as follows: 


(Y 1__) CY 12_) (Y 123) 


NOTE: 


RPG I! users are limited to indicator numbers 7 to 99. 
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3.4.2. Conditional Erase/Replenish Screen 


Remember that each time an operator transmits a format, the next step the screen 
format coordinator takes depends on how you responded to line 10, of the 
characteristics screen when you created the format: 


screen erase/unlock option (B): 1 NONE 2 REPLENISH 
3 ERASE 4 UNLOCK KEYBOARD 
5 CONDITIONAL INDICATOR 


By selecting 5 (CONDITIONAL INDICATOR), you prompt the display of the conditional 
erase/replenish screen (Figure 3—3). This screen lets you specify two indicators that 
conditionally control your screen format’s status. The two indicators you can specify are 
a replenish indicator and an erase indicator. 


ENTER THE CONDITIONAL ACTION DESIRED AFTER INPUT FOR FORMAT xxxxxxxx: 


Tse 

e. 

3 Do you wish all input-only fields to be REPLENISHED after input based upon a 
4 conditional indicator? 

= 

6 (1): NO 2 YES INDICATOR VALUE: (Y __) 

7: 

8 Do you wish to have the screen ERASED after input based upon a 
9 conditional indicator? 

10. 

11 (1): NO 2 YES INDICATOR VALUE: (Y ___) 

12. 





Figure 3-3. Conditional Erase/Replenish Screen 
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When you specify a replenish indicator, this is what happens: 


Step 1 


Your program displays a format at a workstation screen. (The format can contain 
any combination of output, input, and bidirectional fields.) 


Step 2 
A workstation operator fills in and then transmits your format. 
Step 3 


The SFC accepts the data from the format and performs its own validation on the 
input. If successful, it then passes the input to your program. The keyboard 
remains locked. 


Step 4 


Your program performs its own validation of the input. lf and when the input meets 
a condition your program is testing for, it decides that only the input-only fields 
should be replenished. Your program then turns on your replenish indicator and 
signals the SFC. 


Step 5 


The SFC replenishes your input-only fields with a stringed constant (like underlines) 
and unlocks the keyboard. /t doesn't replenish bidirectional and output fields. That 
is, these fields don't receive new output from your program. They retain the values 
they had when the operator transmitted your format at step 2. The associated 
attributes of output and bidirectional fields are rewritten, however. 


When the SFC replenishes the input fields and unlocks the keyboard, the workstation 
operator can enter new data. This time when the operator transmits the format, the 
complete record that the SFC accepts and sends back to your program consists of the 
new data the operator just supplied, as well as the data that was retained and 
unchanged in the bidirectional fields. 


To enter a replenish indicator on the conditional erase/replenish screen, you must first 
answer the question on line 6 and then enter an indicator number: 


Do you wish all input-only fields to be REPLENISHED after input based upon a 
conditional indicator? 


(1): 1NO 2 YES INDICATOR VALUE: (Y ___) 
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The erase indicator you supply on line 11 of the conditional erase/replenish screen lets 
your program conditionally erase the entire screen format. The erase indicator acts as a 
signal to the SFC to completly erase, and thus end, the display of a particular format. 
Typically, you use an erase indicator to signal the end of a workstation session. Like the 
replenish indicator, your program decides when to turn an erase indicator on, based on 
the input it receives from a workstation operator. 


The steps described for the replenish indicator apply also to the erase indicator through 
step 3. At that point, the following occurs: 


= Step 4 


Your program validates the input. If it meets criteria, your program turns the erase 
indicator on and signals the SFC. 


m Step 5 
The SFC, in response, erases the workstation screen and unlocks the keyboard. 


To enter an erase indicator on the conditional erase/replenish screen, you must first 
answer the question on line 11 and then enter an indicator number: 


Do you wish to have the screen ERASED after input based upon a 
conditional indicator? 


(1): 1NO 2 YES INDICATOR VALUE: (CY ___) 


So far, we've discussed what happens when either a replenish or an erase indicator is 
on. The other possibility, not yet covered, is what happens when neither indicator is on. 
When this is the case, your format remains under the normal control of your program 
(as it would be if you specified NONE as your erase/unlock option). The screen format 
remains on the workstation screen and the keyboard remains locked until your program 
requests the display of the same or a new format or, perhaps, turns on other indicators 
that affect your format’s run-time characteristics. 


For a sample format that uses the conditional erase/replenish option, see 4.2. 
NOTE: 


Your replenish and erase indicators take precedence over any other indicators you 
specify. All other indicators are ignored in this type of output operation. 
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3.4.3. Edit Screen 


The edit screen (Figure 3-4) is displayed only if you elect, via line 16 of the 
characteristics screen (SPECIAL EDITING CHARACTERS? (1): 1 NO 2 YES), to replace 
certain numeric edit characters with those of your choice. 


You specify a special edit character by overwriting the character that appears in 
parentheses. You could, for example, overwrite the currency sign ($) with the pound 
symbol (#). You must then use the special edit character (#) instead of the currency sign 
when completing the type attribute screen in pass 2. Thus, a numeric edited field might 
be displayed on the completed format as #9,999.99 instead of $9,999.99. 


Using the edit screen, you may select a character other than the underline (_) to 
replenish all input and bidirectional fields. You can also do this on a field-by-field basis 
by using dialog screen 2 (3.5.2). 





1. ENTER EDIT CHARACTERS IN PARENTHESES TO BE USED FOR FORMAT xxxxxxxx:! 
2. 
3. STANDARD CHARACTER : MEANING: CHARACTER TO BE USED 
4. 
2. $ : currency symbol 
6. decimal point 
?. thousands punctuation 
8. replacement character 
9. credit on negative 
19. debit on negative 
11. replenish character 
12. 
13. 
14. NOTE: Make sure no symbol is ambiguous with any valid picture string character. 
ake 
Figure 3-4. Edit Screen 
NOTE: 


For Katakana, the default currency sign on the edit screen is the yen (Y) instead of the 
dollar sign ($). 
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@ Some general rules pertaining to the completion of the edit screen are: 


1. 


2. 





Special edit characters must be the same length as the original. 


With the exception of the replenishing character, you may not select any of the 
following as special edit characters: !, 9, A, X, O (zero), B, E, +, — (minus), Z, L, H, 
or the underline. 


Special edit characters must not be ambiguous and must be different from each 
other. 


If you enter an unacceptable edit character, it will be blinked. The edit screen can't 
be transmitted until you correct all errors. 


If you decide you don't want to select any special edit characters, simply transmit 
the edit screen as is. 


You may request help or return to the home screen by using the appropriate 
function keys (F13 and F'1). 


. If you want your program to receive the underline character (_) that an operator 


keys in to an input or bidirectional field, you must specify a blank as the replenish 
character. Otherwise, if you use the underline as your replenish character, the SFC 
automatically translates any underlines it detects to blanks. Thus, the underline the 
operator keys in will never make it back to your program. 


Note that if you use blanks as your replenish character, the workstation operator can't 
see where input fields begin and end. (No stringed constant appears after a display 
constant.) If the workstations you use are model 2 (UTS 40D) terminals, you can get 
around this restriction. The model 2 workstations let you treat underlines as a display 
attribute that you specify on a field-by-field basis. See dialog screen 4 (3.5.4) for 
details. 
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3.4.4. Special Display Screen 


By requesting special display control on the characteristics screen, you prompt the 
special display screen to appear as shown in Figure 3—5. 


1. ENTER THE DISPLAY PROPERTIES FOR FORMAT xxxxxxxx: 

2. 

3. Intensity Emphasis: 

4. Display constants (B) 

=e Output variables (B) 

6. Input capable fields CA) 

Cx Fields entered in error (A) 

8. 

9. 

10. 

11. Intensity: Emphasis: 

12. A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
13. B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 
14. 3. STRIKE THRU BARS 

15; 





Figure 3-5. Special Display Screen 


The special display screen lets you select the display properties for the four types of 
fields in your format: display constants, output variables, input variables (those defined 
as input-only or bidirectional), and fields where an operator has made an error entering 
data. 


When the special display screen first appears, it contains the SFG defaults for intensity 


and emphasis (the letters A and B and the numbers 1 through 5 refer to the key that 
appears at the bottom of the screen). The defaults are: 


Output fields: low intensity (B), no emphasis 


Input fields: normal intensity (A), no emphasis 
=  # Display constants: low intensity (B), no emphasis 


= Fields in error: normal intensity (A), blinking emphasis (5) 
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You can change one or all the SFG defaults by entering your own choices. For each 
field, you can specify one intensity and up to five different types of emphasis. For 
example, you can specify that fields in error be displayed in normal intensity along with 
blinking, underlining, and reverse video, all at the same time. You would simply fill in 
line 7 of the special display screen as follows: 


INTENSITY EMPHASIS 
FIELDS ENTERED IN ERROR (A) (es) 


When specifying display combinations, keep in mind the operator who will be using 
your format. Some display combinations could result in eye strain. 


The specifications you make on the special display screen become the new defaults for 
your format. As you'll see in 3.5.4, you can override the format specification for 
individual fields via dialog screen 4. 


NOTE: 


‘Not all display properties are supported by all devices. If the type of workstation where 
your format is being used doesn't support the display combinations you selected, the 
system selects alternate display properties at run time. Appendix E lists these alternate 
display properties. 


3.4.5. Error Message Screen 

lf you want the ability to display an error message from your program on a workstation 
screen, you must designate a field for it on your format. Through the error message 
screen, you can specify where and when the error message is displayed, as well as 
how it should look. You prompt the error message screen by responding as follows to 


line 19 of the characteristics screen: 


Error message field to be defined? (@): 1 NO 2 YES 


Figure 3-6 is a display of the error message screen as it first appears. 
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ENTER THE FOLLOWING INFORMATION FOR YOUR ERROR MESSAGES FOR FORMAT Xxxxxxxx: 








Message field name is: (ERRORMSG) 





Number of lines in error message: (1) ENTER 1 OR 2 
Error message to be displayed on Line number: (LAST) ENTER NUMBER OR 'LAST' 










Error messages conditionally displayed: indicator (Y ___ 






Intensity (A) 
Emphasis: ( 


Display attributes: 















Intensity: Emphasis: 
A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 

3. STRIKE THRU BARS 







Figure 3-6. Error Message Screen 


The screen can be analyzed as follows: 


Line 1 


Contains the name of the format being generated, where xxxxxxxx is the 
8-character name of your format. 


Line 3 


Displays the name of the error message field. The SFG assigns the name 
ERRORMSG to the error message field. If you prefer, you can enter your own, 
application-oriented name. It must be unique and must begin with an alphabetic 
character and can be a maximum of eight characters. It can contain any valid 
alphabetic character, the numerals O to 9, and the special characters $, #, a, x, @, 
and ?. No embedded spaces are allowed. 


Line 5 


Asks you to designate one or two lines (60 or 120 characters) for your error 
message. The default is one line. Note that even if the text of your error message 
is less than 60 or 120 characters, you should assign either 60 or 120 characters 
for it in your program. This ensures that when your error message is displayed, the 
entire field is filled with either text or blanks. Otherwise, since the SFC expects 
either 60 or 120 characters, it could fill the field in with meaningless data from 
your work area. 
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_ w Line 6 


Displays the location of the error message field. The error message field location 
defaults to the last line of the screen. You can, however, specify an actual line 
number (or numbers for 2-line messages) indicating where you want the error 
message to appear. You should be careful, however, not to choose a line that will 
contain input or bidirectional fields. If you inadvertently do so, the screen format 
generator won't detect it; at run time it could result in erroneous data being 
returned to your program, or you'll get an error message from the SFC. 


w Line 8 


Asks you for a conditional indicator. If your program detects an error when it 
validates input, it can turn on the error message indicator. The SFC, in response, 
displays the error message on your format. (You can also use the N nnn form for 
the indicator, where as long as the indicator is on, the error message is not 
displayed. When the indicator is off, it is displayed. Unconditional indicators aren't 
suitable for this feature.) 


= #£é&Lines 10 and 11 


Displays the default display properties (intensity and emphasis qualities) for the 
error message field. The defaults are normal intensity (A) and no emphasis. To 

© specify your own choice of display properties, overwrite the default values, using 
the key at the bottom of the screen for reference. You can combine one intensity 
with as many as five types of emphasis. 


= Lines 16 through 19 


Display a key for entering your choice of display properties. The letters A and B 
refer to intensities, and the numbers 1 through 5 refer to types of emphasis. 


NOTES: 


1. The error message field must be the last field you define in the output record area 
of your program. 


2. The error message indicator overrides any other user-specified retain options. 


When the error message indicator is on, the display of the message isn’t the only thing 
that occurs. The SFC also retains the contents of all variable data fields on the screen 
and rewrites the display attributes of each field. This gives you two important 
advantages. 


First, your program typically displays an error message when an operator enters and 
transmits the wrong data. By retaining the contents of variable data fields, the operator 
can see exactly what he entered (and what caused your program to display the error 
message). 
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Secondly, by completely rewriting the field display properties (the intensity and 
emphasis of each field), the SFC can highlight the field where the operator made the 
error. This ability to highlight a field in error involves more than what the error message 
screen can provide. To highlight a field, you need to specify a conditional indicator that 
controls its display properties. You specify such an indicator via dialog screen 4 (3.5.4), 
the special display properties dialog. 


3.4.6. Display Retention Screen 


The display retention screen (Figure 3—7) lets you set an indicator that controls whether 
the contents of variable data fields are retained on the workstation screen. 


1. Do you wish the display image to be CONDITIONALLY RETAINED 

2. ‘for all fields of format xxxxxxxx? 

3. 

4. (1): 1NO 2 YES INDICATOR VALUE: (Y ___) 

5 

6. 

7. NOTE: If this option is selected, an output command will affect display 
8. attributes only, unless overridden at field level via DIALOG 5. 
9. 

10. 

11. 





Figure 3-7. Display Retention Screen 


Display retention occurs when your program receives data from your format and, based 
on the nature of the data, turns the retain indicator on. In response to the retain 
indicator, the SFC doesn't change the text of the workstation screen. Output fields 
retain the values they previously received from your program; they aren't replenished 
with new values. Bidirectional fields retain either the value supplied by your program or 
the value a workstation operator keyed in over it. Input fields are left with the data the 


workstation operator keyed in; they aren't replenished with underlines or other stringed 
constant. 
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The only thing the SFC actually rewrites to the screen is each field’s display attributes 
(that is, their intensity and emphasis). If the display attributes don’t change, an operator 
wont notice a difference in the format. However, if the SFC sends out new display 
attributes to a field (such as blinking or reverse video), the operator will notice a very 
visible difference. 


You can use the display retention indicator with other indicators. For example, if your 
program detects an error in the input it received from your operator, it can turn on two 
indicators: a retain indicator that preserves the data on the screen, thus allowing an 
operator to see what he entered, and an indicator that changes the display attributes of 
the field in error, such that the field stands out from the others. When the workstation 
operator corrects the field in error and transmits the screen, the SFC accepts the newly 
corrected value the operator entered, as well as the other values that were retained on 
the screen. (See dialog screen 4 (3.5.4) for an explanation of how to conditionally 
control field display attributes.) 


You can also specify display retention at the field level via dialog screen 5. Note, 
however, that your field-level indicator always overrides the format-level indicator. This 
being the case, you can selectively retain all or just some of the fields on your format. 


NOTE: 


The first time a format is written to a workstation screen, the SFC ignores any retain 
indicators you specify. 


To supply an indicator on the display retention screen, you must first answer the 
question on line 4: 


DO YOU WISH THE DISPLAY IMAGE TO BE CONDITIONALLY RETAINED 
FOR ALL FIELDS OF FORMAT xxxxxxxx? 
(4) 1NO 2 YES INDICATOR VALUE: (Y ___) 


You then supply the indicator value, also on line 4. (If desired, you can use the 
unconditional Y OOO or Y — — — forms of the indicator, as well as the N nnn form.) 
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3.4.7. Function/Command Key Screen 
The function/command key screen (Figure 3-8) lets you designate which keys you 


assign your own program functions to. The allowable keys are function keys 1 through 
22 on the workstation keyboard. 


ENTER THE FUNCTION/COMMAND KEYS TO BE USED BY FORMAT xxxxxxxx: 


Vs 

2% 

3. Key# Accept? Response Key# Accept? Response Key# Accept? Response 
4. 

Ds F 1 (N) CD F2 (N) F3 (N) 

6. F4 CN) ae F5 (N) F6 (N) 

t. F7 (N) (___) F8 (N) F9 (N) 

8. F1@ (N) C.D F11 (N) F12 (N) 

9. F13 (N) (___) F14 (N) F15 (N) 
10. F16 (N) ( _.) F17/ (N) F18 (N) 
11. F19 (N) ED? F20 (N) F21 (N) 
12. F22 (N) (J 

13. 

14. 

15. (Use function key #13 for help. This will explain indicator syntax.) 
16. 

rae 

18. 





Figure 3-8. Function/Command Key Screen 


There are two ways of assigning function/command keys: 


= You can accept a key and assign a response indicator to it. When a workstation 
operator presses the key, the indicator is turned on and returned to your program, 
thus prompting some action to occur within the program. 


= You can simply accept a key without assigning a response indicator to it. When a 
workstation operator presses the key, your program is alerted to take a particular 
course of action. 


The difference between assigning indicators and not assigning indicators depends on 
how you code your program and the function you're using a key for. The indicators you 
specify for function keys are response indicators. They’re different from any of the 
other indicators you supply to the SFG. The other indicators (called option indicators) 
are passed from your program to the SFC. Response indicators, on the other hand, are 
passed from the SFC to your program. Therefore, response indicators are handled 
differently in your program. Consult Section 7 for details. 
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Normally, when an operator presses a function key associated with a response 
indicator, no data is sent to your program. Instead, your program receives either blanks, 
zeros, or default constant values. (A bidirectional field that has been conditionally 
protected or conditionally displayed returns the value it received from your program.) In 
addition, if an operator presses a function key that hasn't been accepted and which 
screen format services doesn't use, an error message is sent to the workstation. The 
workstation operator must then acknowledge the message in system mode. 


NOTES: 


1. It is recommended that you use only function keys 2, 3, 4, and 6 through 10. 
Function keys 1, 5, and 117 through 22 are already defined by the system. If you 
do reassign a function key that the system uses, you'll lose that system function. 
Appendix C lists the SFC function keys. 


2. User-assigned function keys aren't supported in an IMS environment. 

3. Response indicators shouldn't be specified for RPG Il programs. RPG Il has a special 
set of indicators (KA—KN, KP-KW) for the function keys. F1—-F14 correspond to 
KA-KN; F15-22 correspond to KP—KW. 

4, When executing SFG from the UNISCOPE 400, you may not request function key 
specification. 

3.4.8. Nondisplay Screen 

The nondisplay screen (Figure 3—9) lets you define a single field that communicates with 


your program but never appears on the workstation screen. This can be used when 
there is some value or information that you don't want an operator to have access to. 


1. DESCRIBE THE SINGLE NON-DISPLAYED FIELD FOR FORMAT xxxxxxxx: 

2. 

3. Length of this field is (__) 

4. 

5S. Value of field is (1): 

6. 1 - FIRST FIELD OUTPUT BY PROGRAM (FIELD IS BIDIRECTIONAL). 

7. 2 - FIELD IS INPUT-ONLY, VALUE IS: 

8. 

9. 

10. This value is always the first INPUT FIELD which is named: (FLDO0000) 
11. 

12. 

13. 

14. NOTE: If option #1 is selected above, it is also the first output field. 
15. 





Figure 3-9. Nondisplay Screen 
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The nondisplayed field that you define must be the first field in the input or output work 
area in your program. It can be an input constant associated with the format, or it may 
be a variable. In the latter case, this bidirectional field is communication between the 
output and input logic of the program. The value is not available to the workstation 
operator to inspect or change. 


In the former case, the input-only field is a constant that enables the program to take 
some action based on information stored in the format rather than in the program. 


The first question the nondisplay screen asks is the length of the field. The range of 
acceptable entries is 1 to 80. The second question the screen asks is whether the field 
is bidirectional or input only. If the field is input only, you enter the constant value. The 
SFG field name (FLDOOOOO) appears on line 10. As with any other field name, you have 
the option of renaming it, using an application oriented name. 


3.5. DIALOG SCREENS 


After you transmit your optional screens (or, if you didn't request optional screens, then 
after you transmit the characteristics screen), you're ready to set up your format. This 
involves three passes: in pass 1, you lay your format out on a blank screen; in pass 2, 
you assign editing attributes to variable data fields; in pass 3, you indicate field I/O 
direction and initiate dialog screens for the fields that require them. Dialogs, however, 
are also initiated automatically for any field defined with an exclamation point in pass 2 
or defined with edit characters that can be protected. Section 4 explains how to 
complete passes 1 through 3 and how you initiate dialogs. This subsection introduces 
and defines what the various dialog functions are. 


Dialog screens are used to place additional requirements on how information for certain 
variable data fields is to be handled at run time. They serve a purpose similar to the 
optional screens, only they affect individual fields rather than the whole format. 


Some dialogs let you set up conditional indicators that control how a field looks or 
behaves under certain conditions. These indicators are values you define in your 
program and on the appropriate dialog screen. At run time, they act as a signal to your 
format, telling it that a field is to be treated differently from the other fields on the 
screen. These indicators work the same way as the indicators used on the optional 
screens. Refer to 3.4.1 for a brief explanation of what the indicators do. 
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& Table 3-2 lists and briefly describes the eight dialog screens. 


Table 3-2. Dialog Screens and Their Functions 


Dialog 
Screen 


Aiways first dialog displayed. Indicates I/O direction, field name, internal field length, edit mask, 
and insertion characters and asks you if additional dialog screens are required 


Indicates field response, default input value, and replenishing value for input only fields. Indicates 
field response and default input value for bidirectional fields. 


Conditional display dialog. Specifies when a field will or will not appear at a workstation screen 
Special display properties dialog. Controls the display properties of individual fields 


Conditional retention dialog. Indicates when the contents of a field should be retained on a 
workstation screen 


Conditional protection dialog. Indicates when the contents of a field should be protected 


Field change notification. Sets the indicator value when the field is changed on input 


Range checking. Indicates what the valid range of values is for a field 





©@ After transmission of the |/O screen (pass 3), dialog screen 1 is always presented 
automatically for the first field requesting dialogs. 


If more than one field requests dialogs, the SFG handles the fields one at a time. When 
dialog screen 1 and any subsequent dialogs are completed for the first field, dialog 
screen 1 is automatically presented for the next field and so on until all the fields 
requesting dialogs have been satisfied. The creation of your format is then complete, 
and the home screen is displayed for you to choose another function. 


The following are some general rules to keep in mind when you're working with dialog 
screens: 


1. You must correct all errors (indicated by blinking or message) before transmission 
of the screen can occur. To ignore warning messages, position the cursor to the 
end of the screen and press the transmit key. 


2. You may terminate the session at any point via the F1 function key. No screen 
format is created, and the home screen appears for you to specify another function. 


3. You can initiate the HELP function at any point during dialogs. 


4. Positioning of the cursor before transmitting dialog screens is the same as 
described for the home screen (3.6). 
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3.5.1. Dialog Screen 1 (General Field Characteristics) 


Dialog screen 1 (Figure 3—10) is always the first dialog screen presented for any field 
requiring dialogs. On it you can specify an alternate field name, the 1/O direction, the 
internal field length, edit mask, and insertion characters. It is also where you request 
dialog screens 3 through 7. 


1. display of the field 

2: 

3. (FLDnnnnn) is for field use of (1): 1 QUTPUT 2 INPUT 3 BOTH 
4. 

5. Internal usage is (1): 1 DISPLAY 2 PACKED 3 BINARY 4 ZONED 
6. Internal Length is: (nn) | 

te 

8. PLEASE INDICATE WHETHER OR NOT THE FOLLOWING ARE REQUIRED: 

9. Conditional display? (1): NO 2 YES 

10. Special display properties? (1): NO YES 

11. Conditional retention? (1): NO YES 

12. Conditional protection? (1): NO YES 

13. Field change notification? (1): NO YES 

1G. Range checking? (1): NO YES 

15. 

16. REPLACE ''!'' IN THE FOLLOWING LINE WITH INSERTION CHARACTERS 

17. display of the field 

18. 

19. 





Figure 3-10. Dialog Screen 1 


Each line of the format can be analyzed as follows: 
= Line 1 


This line displays the field requesting dialogs. It appears the way it was defined in 
pass 2 (the type attribute screen). If the field is the only one on a line, it appears 
by itself. However, if one or more fields requesting dialogs are located on the same 
line with other fields, the entire line, up to and including the field that requires 
dialogs, is displayed. 


For example, you could design your format with three fields on a single line like 
this: 


NAME SOCIAL SECURITY AMOUNT DUE 


a ewe we ee ee ee ee oe ao oe ee ee ee ee ee ee we eh > ee a a oe oe oe oe oe 
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If dialogs are requested for both the SOCIAL SECURITY and AMOUNT DUE fields, 
then line 1 of dialog screen 1 for the SOCIAL SECURITY field would look like this: 


NAME A SOCIAL SECURITY: 99919919999 


Line 1 of dialog screen 1 for the AMOUNT DUE field would appear as: 


NAME A SOCIAL SECURITY: 999!199!19999 AMOUNT DUE: $99.999.99 


Line 3: 


(FLDnnnnn) IS FOR FIELD USE OF (1): 1 OUTPUT 2 INPUT 3 BOTH 


Shows a default name for the field (FLDnnnnn) and also lets you change the 1/O 
direction for that field from the choice made on the I/O screen. 


The SFG automatically gives a name to each variable data field in the format. This 
name is kept in a table that can be referenced for future modification (via the 
modify screen for the CREATE-FROM or MODIFY functions). These names are 
assigned as ‘FLDnnnnn’ sequentially, where O < nnnnn < 256. You can, however, 
assign your own logical field name by overwriting the default name in the 
parentheses. The logical name should be unique and should not be a duplicate of 
an SFG-provided name. It must start with an alphabetic character, must not 
contain an embedded blank, and must not exceed eight characters. The only 
acceptable special characters it can contain are: #, @, $, ?, — (underline), and - 
(hyphen). 


You specify the !/O direction for the field either by accepting the default value 
within the parentheses or by overwriting it with one of the other acceptable values. 
(If you indicate that the field is an INPUT or BOTH field, the next dialog screen 
presented is dialog screen 2.) 


Line 5: 


INTERNAL USAGE IS (1): 1 DISPLAY 2 PACKED 3 BINARY 4 ZONED 


Shows the type of internal usage. The default value for this question is normally 1. 
You should overwrite this value if the usage of the field within your program is 
anything other than display. If you specify one of the other usages for an input 
field, the information entered by the workstation operator is automatically converted 
to that usage. If you specify another usage for an output field, that information is 
automatically converted to display form on output. Usages specified for a 
bidirectional (input/output) field are handled accordingly. 


The default internal usage for a field defined in pass 2 with a sign (+, —, CR, DB) ts 
ZONED. A display field can't represent a signed number (internally). 
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= Line 6: 


INTERNAL LENGTH IS: (Cnn) 


Shows the default internal length calculated by the SFG. The SFG determines 
internal length based on the picture string defined on the type attribute screen (I's 
and other edit characters used for simple and fixed insertion are not counted) and 
upon the internal usage (packed, binary, zoned, or display) specified. 


Depending on the internal usage specified and the internal length calculated, the 
SFG may generate one of the three following warning messages. 


SFG4@ INTERNAL LENGTH IS LESS THAN DEFAULT FOR USAGE SPECIFIED 


Indicates that the internal length entered for the field is less than it should be 
based on the internal usage specified. 


SFG41 INTERNAL LENGTH IS GREATER THAN DEFAULT FOR USAGE SPECIFIED 


Indicates that the internal length entered is greater than it should be based on 
the internal usage specified. 


SFG42 INTERNAL SIZE MAY BE INVALID. CHECK USER PROGRAM 





Indicates that the internal length entered may be invalid for the internal usage 
specified. If, for instance, a binary field is not specified as one, two, or four 
bytes, this message appears. 


lf desired, the internal length and/or the internal usage may be changed, or the 
warning message may be disregarded. To disregard it, place the cursor at the end 
of the dialog screen and transmit. 


In all cases, however, the internal size and usage provided on the dialog screen 
must be compatible with the data structures (data division in COBOL, input and 
output specifications in RPG Il, etc) within the program; otherwise, an error 
condition may result during execution of the program. 

m Lines 8 through 14: 


8. PLEASE INDICATE WHETHER OR NOT THE FOLLOWING ARE REQUIRED: 


9. Conditional display? C1): 1 NO 2 YES 
10. Special display properties? (1): 1 NO 2 YES 
11. Conditional retention? (1): 1 NO 2 YES 
12. Conditional protection? (1): 1 NO 2 YES 
13. Field change notification? (1): 1 NO 2 YES 
14. Range checking? (1): 1 NO 2 YES 
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List the other dialog screens you can select for the field. If you enter 2 (YES) for 
any of the above, the associated dialog screen is displayed after you transmit 
dialog screen 1 (or after you complete and transmit dialog screen 2 if the field is an 
input field). 

NOTE: 

Line 10 (Special display properties) is not available for the UNISCOPE 400. 

w Lines 16 and 17 


REPLACE !'S IN THE FOLLOWING LINE BY INSERTION CHARACTERS 
display of the field 


The contents of lines 16 and 17 vary according to the type attributes and I/O 
direction of the field. If exclamation marks were used to indicate that insertion 
characters were required, then line 16 would display the message shown in Figure 
3—10 (REPLACE !’S IN THE FOLLOWING LINE BY INSERTION CHARACTERS). 

For example, suppose after pass 2 you had a field defined like this: 


SOCIAL SECURITY: 999!199!999 


Lines 16 and 17 of dialog screen 1 for this field would then appear as follows: 


REPLACE !'S IN THE FOLLOWING LINE BY INSERTION CHARACTERS 
9991991999 


You would then overwrite the exclamation marks with a dash: 


REPLACE !'S IN THE FOLLOWING LINE BY INSERTION CHARACTERS 
999-99-999 


The dashes will be protected. They aren't counted in the internal field length and 
can't be overwritten when the format is being used with a program at run time. 


If dialogs were required for a field requiring protection for edit characters, a 
different message would appear on line 17. For example, if you had a field defined 
as: 


AMOUNT DUE: $99,999.99 
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Then lines 16 and 17 would appear as: 


USE A '/' TO MARK PROTECTED EDIT CHARS IN THE FOLLOWING LINE 
$99,999.99 


The only characters you can overwrite are the comma (,) and the decimal point (.). 
(The currency symbol ($) is automatically protected.) Overwriting these characters 
with the slash causes that character to be protected. Protected characters act as an 
edit mask and are not counted in the internal length of the field. 


If you choose to overwrite, the field in this example would appear as $99/999/99. 


When the completed format is displayed on the workstation during its use with a 
program, this field appears as: 


NOTE: 


lf you specify protection for a comma in a numeric field, you must also specify 
protection for the decimal point and vice versa. 


Table 3-3 summarizes how the contents of lines 16 and 17 vary according to the 
way a field is defined. 


Table 3-3. Contents of Lines 16 and 17 of Dialog Screen 1 


If Field Requesting Dialog Line 16 Reads Line 17 Displays 


Is input, output, or both REPLACE !'S IN THE FOLLOWING The field in 
LINE BY INSERTION CHARACTERS question 


Contains one or more It's 


is one of the following 

types: 
Alphabetic (AA!IAAA) 
Alphanumeric (AAA!XXxX) 
Numeric (999!999) 


Is input or both USE A‘/'TO MARK PROTECTED The field in 
EDIT CHARS IN THE FOLLOWING question 
Is numeric edited: LINE 
$99,999.99 
$9.99 
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If the field is other than those described in Table 3-3, nothing appears on lines 16 and 
17. 


NOTE: 


Numeric edited fields containing any acceptable combination of the floating insertion 
sign $, +, or —; the character CR or DB; or the suppression/replacement character * are 
always output fields, and are completely protected like all other output fields. The 
suppression character Z is bidirectional or output and is also completely protected when 
used as output only. It is for this reason that you aren't asked to specify any edit 
characters to be protected. The same is true for alphanumeric fields containing B or O. 


some general rules to keep in mind when completing dialog screen 1 are: 


1. You provide responses for dialog screen 1 by overwriting the default values. If no 
overwriting is done, the defaults are automatically accepted. 


2. When you use any character other than a slash to indicate protection for a numeric 
edited input or bidirectional field, it is tgnored. 


3. Characters that can be protected in a numeric edited input or bidirectional field are 
the comma and the decimal point. If you specify protection for one, you must do 
so for the other. 


4. Zero suppression of a bidirectional field does not work when the punctuation of the 
field is protected. Zeroes appear instead of underlines. 


5. You can't replace any character other than the exclamation point with an insertion 
character. 


6. The exclamation point may be used as an insertion character. 


3.5.2. Dialog Screen 2 (Input Field Response, Default, and Replenishing) 
For any input field, dialog screen 2 lets you specify the: 


@ field response 

@ default input value 

@ lowercase translation option 
@ replenishing value. 


The initial replenishing value cannot be specified for bidirectional fields. If you specify 
YES for lowercase translation, the field is translated. If you specify NO, the screen level 
choice is used. 


Note that this choice is not a field override option. You cannot say YES at the screen 
level and NO at the field level to cause no translation for a particular field. NO must be 
specified at the screen level to change the field level choice. 
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Recall from 3.3.4 that the SFC can erase input from a format (from an input only field) 
so that a workstation operator can enter new data. When the input is erased, the area 
where the input appeared ts replenished, or replaced, with underlines. Dialog screen 2 
provides you with the option of choosing a character string other than underlines to 
replenish an input only field. You may also indicate how much or how little of an input 
only or bidirectional field must be completed by the operator. This is referred to as the 
field response. You can also specify a default value for an input only or bidirectional 
field. This value is returned to your program when an operator doesn’t enter data in the 
input field. Figure 3-11 shows the format of a sample dialog screen 2 display for a field 
called the SOCIAL SECURITY field. 


1. SOCIAL SECURITY: 999-99-9999 

2. 

as Field response (1): 1 OPTIONAL 2 REQUIRED 3 MUST-FILL 4 DEFAULT VALUE IS: 
4. 

5. 

6. Lowercase translation (1): 1 Yes 2 No 

ie 

8. 

9. Initial replenishing value is: 

10. ee ee 

11. NOTE: For DEFAULT, alpha characters will be passed to program in upper or 

12. lower case as entered. For REPLENISH, alpha characters will be displayed 
13. as entered. 





Figure 3-11. Dialog Screen 2 


The explanations for the lines in Figure 3-11 are: 


= Line 1: 


Displays the field for which the dialogs are being performed. Note that any insertion 
characters (such as the hyphen) that you supplied in dialog screen 1 are shown. 


w Line 3: 


Permits you to overwrite the default value (1) for the field response with any of the 
other values listed. 


OPTIONAL 


Means that any or no characters may be entered for the field. If no character is 
entered, zero will be assumed for numeric fields and left-justified with blank 
padding for alphabetic and alphanumeric fields. 
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REQUIRED 


Means that at least one character must be entered for the field. The value is 


right-justified with zero padding for numeric fields and left-justified with blank 
padding for alphabetic and alphanumeric fields. 


MUST-FILL 


Means that the field must be completely filled in by the workstation operator. 


DEFAULT VALUE IS 


If no characters are entered for the input field, a value that you supply will be 
used for the program. The value is defined in the following line (4) and is 
right-justified with zero padding for numeric fields and left-justified with blank 
padding for alphabetic and alphanumeric fields. 


Line 4 


May only be used if you select DEFAULT VALUE IS for the FIELD RESPONSE. You 
overwrite the underlines with the value that you want used in the program if the 
workstation operator fails to enter anything for that field. As the note at the 
bottom of the dialog screen indicates (Figure 3-11), alphabetic characters will be 
passed to the program exactly as they are entered here (in uppercase or 
lowercase). A numeric value is converted to the appropriate internal usage (display, 
packed, binary, zoned) just as it would be if the workstation operator entered it. 


Under certain circumstances, one of the following messages may be issued for an 
entry on line 4. 


SFG51 DEFAULT VALUE HAS AN INVALID CHARACTER, OR IS WRONG TYPE 


This is displayed if you enter a value that is not compatible with the external or 
the internal usage specified (e.g., the default value contains an alphabetic 
character when the field's internal usage is specified as packed or binary) or 
one that has an invalid construction (e.g., more than one sign or decimal point, 


no valid numeric digits for a numeric field). You must correct this value to 
continue. 


SFG5@ DEFAULT VALUE IS NON-NUMERIC OR ALL UNDER-LINES CWARNING) 


This is displayed if you enter a nonnumeric value for a field defined externally 
as numeric or numeric-edited and internally as display or zoned. This situation 
is acceptable but it may not be intentional. If the value is correct, the message 


can be ignored. To ignore it, position the cursor to the bottom of the screen 
and then transmit. 
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SFG52 DEFAULT VALUE IS TOO LARGE TO BE PROCESSED 


This is displayed if the value you enter for a numeric field is: 
1. more than 40 digits for DISPLAY or ZONED internal usage; 
2. more than 15 digits for PACKED DECIMAL internal usage; or 


3. not within the range —23' < value < (23'—1) for BINARY internal usage. 


ew Line 6 


Allows you to select lowercase to uppercase translation at the field level. If you 
specify YES, the field is translated. If you specify NO, the screen level choice is 
used. As indicated by the parentheses, the default value is 1 (YES). 


=> aw Line 10 


Pertains to input only fields and not bidirectional fields. Displays what the 
replenished input field looks like. (Bidirectional fields are not replenished.) You can 
accept the underline as the replenishing value or specify another value by 
overwriting these underlines. Alphabetic characters are displayed on the format 
exactly as they are entered here (in uppercase or lowercase). 


It's important to note that if you specify a replenish character that doesn’t match 
the field's data type (numeric, alphanumeric, alphabetic), it could result in error. If 
the operator completely fills in such a field (thus overwriting the replenish 
character), he can successfully transmit the format. Otherwise, the SFC returns the 
replenish value as part of the data and the illegal characters are rejected. 


In addition, the SFC doesn't translate underlines (_) that it detects within a 
user-specified replenish value to blanks or zeros. Therefore, you should not specify 
a replenish string that contains an underline for numeric or alphabetic fields. If you 
do and an operator doesn't key over the underline with a valid character, the SFC 
rejects the field. Be aware, too, that if your field is alphanumeric, the SFC won't 
translate the underline to a blank but it will accept it as input. In this case, it could 
return a meaningless character to your program. 


3.5.3. Dialog Screen 3 (Conditional Field Display) 
Dialog screen 3 is the conditional display dialog. It appears as shown in Figure 3—12. 


Conditional display lets you specify an indicator that controls when a field appears at a 
workstation screen. At run time, your program can decide if it needs a particular field 
displayed. If it does, it can turn the display indicator on. If it doesn’t, it turns the 
indicator off. (If you use the N nnn indicator syntax, then the opposite is true: display 
occurs when the indicator is off and is suppressed when the indicator is on.) 
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1: display of field 

re 

Le Specify the conditional indicator which is to CONTROL DISPLAY of field FLDnnnnn 
4. 

5. INDICATOR VALUE: (Y __) 

6. 

Ts 

8. 

9. NOTE: The first character of the INDICATOR VALUE should be a ''Y'' if display is 
10. to occur when the indicator is on; an ''N'' if display is to occur when 
11. indicator is off. 

12. 

13. F-KEY 13 will provide help. 

14. 

15. 


Figure 3—12. Dialog Screen 3 


When a field is not displayed, only the display constant (if one is associated with the 
field) appears. (For example, if you had a field like 


SOCIAL SECURITY _ _ —-__-__~_— 


only the SOCIAL SECURITY constant appears.) When your program turns the display of 
an input field off, a workstation operator is unable to enter any data to it. The value 
returned to your program in this case is blanks, zeros, or a default value that you 
specified for the field via dialog screen 2. If you turn off the display of an output or 
bidirectional field, your program still sends a value for it out to your format, but the SFC 
doesn't display it on the screen. In the case of bidirectional fields, the value your 
program sends to the format is returned to your program as part of the input record. 


lf you have an output field whose value you never want the workstation operator to 
see, you can unconditionally prevent its display. To do so, use the N OOO syntax for the 
indicator. This hides the output variable, but saves you the work of rearranging your 
output record. 


NOTES: 
1. If you initially prevent the display of an input field and then on the next output 
operation set a retain indicator for it, an operator won't be able to enter data to 


that field. 


2. If a field is not displayed, the associated preceding constants will be displayed. 
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3.5.4. Dialog Screen 4 (Special Field Display) 
Dialog screen 4 is the special display properties dialog. It lets you specify: 
= Default display properties for a field 


= Conditional display properties for a field that only take effect when an indicator is 
set 


Instead of only one indicator, however, dialog screen 4 lets you specify as many as four 
indicators, each associated with a different intensity/emphasis combination. In addition, 
each display combination has a different priority level. 


Accessing dialog screen 4 from a UNISCOPE 400 will result in an SF34 error: TOO 
MANY FCC’s REQUIRED PER LINE. This is because line 10 of dialog screen 1 is not 
applicable to this terminal. Dialog screen 4 is only accessible when a 2 (YES) is keyed in 
on line 10 of dialog screen 1. 


Figure 3—13 shows a display of dialog screen 4. 


















Is display of field 

2: . 

3. DISPLAY PROPERTIES FOR FIELD FLDnnnnn: 

4. 

>. Intensity Emphasis: 
6. Lowest precedence: I. Default properties (A) Cee ) 
13 II. Option indicator (. ___) (>) re ) 
8. III. Option indicator ¢(_ —___) (_ eat ) 
9. IV. Option indicator (¢(____) C_ en? ) 
10. Highest precedence: V. Option indicator (¢(. ___) C_ Ce ) 
11. 

12. 

13. 

14. 

15. Intensity: Emphasis: 

16. A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
17. B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 
18. C. NOT DISPLAYED 3. STRIKE THRU BARS 6. POSITION CURSOR 
19. E. SAME AS FIELDS IN ERROR 

20. 


Figure 3-13. Dialog Screen 4 
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When dialog screen 4 first appears, line 6 shows the default display properties that 
have already been assigned for the field. This default can be one of two things: 


1. The value assigned by the SFG 
2. The value you assigned on the special display screen (3.4.4) 
In Figure 3-13, the defaults shown are the SFG defaults for a bidirectional field: 


DISPLAY PROPERTIES FOR FIELD FLDnnnnn: 
Intensity: Emphasis: 
Lowest precedence: I. Default properties (A) ( ) 


The A refers to the key that appears at the bottom of the dialog screen; it signifies 
normal intensity. Since the emphasis field is left blank, it means there is no special 
emphasis for the field. You can specify a different default for the field by overwriting 
the SFG default with your own choice of display properties. 


Every display combination you specify can have as many as six different types of 
emphasis and one type of intensity. To enter an intensity, refer to the key at the 
bottom of the screen and then enter the letter representing the intensity you want in the 
column marked INTENSITY. You do the same for the emphasis by entering the numbers 
for the different types of emphasis in the field under EMPHASIS. 


On lines 7 through 10, you can specify up to four indicators and corresponding 
intensity/emphasis combinations. At run time, the intensity and emphasis of the field 
depend on which indicator is on. The indicators are assigned priority levels. This way, if 
more than one indicator is on at run time, the one with the highest priority level 
prevails. The default always has the lowest priority, followed by Il OPTION IND on up to 
V OPTION IND, which has the highest priority level. 


Preceding each indicator number you must supply a Y or N, depending on how you 


want the indicator to trigger a particular display. The (Y — — _) syntax implies that 
when an indicator is on, the field appears with the intensity/emphasis associated with it. 
The (N — — —) syntax implies that a field appears with a particular intensity/emphasis 


only when the indicator associated with it is off. (Unconditional entries are not permitted 
for this dialog.) 


UP-9977 SPERRY OS/3 3-42 
SCREEN FORMAT SERVICES 


ar 


Lines 15 through 19 list the various intensities and types of emphasis you can choose 
from. Table 3—4 explains each one. 


Table 3-4. Intensity/Emphasis Selections 


Display Property Function/Appearance 


INTENSITY: 

A. NORMAL INTENSITY Fields appear with normal screen intensity. 

B. ALTERNATE (LOW) INTENSITY Fields appear in low intensity, like display constants. 

C. NOT DISPLAYED Characters keyed in won't appear on the workstation screen. For 
example, if a field was meant for a password, an operator could 
enter the password without the characters actually appearing on 


the screen. 


E. SAME AS FIELDS IN ERROR A field appears with the same intensity as fields entered in error. 
This intensity is not permitted for output fields. 


EMPHASIS: 
1. UNDERLINED Fields are displayed with underscores. 


2. COLUMN SEPARATORS Fields are highlighted with the column separator character (| ). 


3. STRIKE THRU BARS Fields appear with strike-thru bars through the characters. 


4. REVERSE VIDEO Characters in a field appear black on a green video background. 
5. BLINK FIELD Field is highlighted by blinking. 


6. POSITION CURSOR You can set up your format (using an indicator) so that the cursor 
is automatically positioned at a particular field. Normally, the | 
cursor is positioned at the first input or bidirectional field. If the 
POSITION CURSOR indicator for more than one field is set, the 
cursor is positioned at the first of those fields. You can't specify 
POSITION CURSOR for output fields. 





NOTE: 


Not all devices support every display attribute. See Appendix E for a list of what devices support what attributes. 
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3.5.5. Dialog Screen 5 (Conditional Field Retention) 


This is the conditional retention dialog screen. It let's you specify an indicator that 
controls when the contents of a field are retained on the workstation screen. When a 
field is retained, only the field's display attributes (intensity and emphasis) are rewritten 
to the workstation screen. Figure 3—14 is a display of dialog screen 5. 


1. display of field 

2. 

3. Specify the indicator you wish to CONTROL DISPLAY RETENTION for field FLDnnnnn: 
4. 

5. INDICATOR VALUE: (Y ___) 

6. 

fa 

8 n ° a a ° 

9. This indicator will override format-level display retention for this field, 
10. if specified. If this condition is met, an output command will affect the 
11. display attributes only. 

12. 

13. F-KEY 13 will provide help. 

14. 





Figure 3-14. Dialog Screen 5 


lf your program sets a retain indicator for an output field, the field retains the value your 
program sent to it. A bidirectional field retains either the value your program supplied or 
the value an operator keyed in over your program value. An input field retains the data 
a workstation operator entered. The value retained in either a bidirectional or input field 
is the value that is ultimately returned to your program. 


since the retain operation allows the SFC to rewrite the field display attributes, you can 
highlight any field you retain. For example, when your program sets a field retain 
indicator, it can also set a special display indicator from dialog screen 4. 


The retain option can also be specified at the format-level (3.4.6). However, the 
field-level retain indicator you specify on dialog screen 5 overrides the format-level 
retain indicator. 


lf you use the (Y — — _) indicator syntax, the contents of a field are retained on the 
workstation screen when the indicator is on. If you use the (N — — _) indicator syntax, 
the field is retained only when the indicator is off. (Use of the unconditional syntax is 
permitted, but not recommended.) 


NOTE: 


When a format is initially written to a screen, any retain indicators are ignored. 
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3.5.6. Dialog Screen 6 (Conditional Field Protection) 


Dialog screen 6 is the conditional protection dialog. Conditional protection prevents an 
operator from entering data in an input or bidirectional field, if a protection indicator is 
set. 


When a protection indicator is set, a workstation operator is unable to position the 
cursor at that field. The cursor simply skips over it. You control protection via the 
indicator you enter on dialog screen 6, shown in Figure 3-15. 





1. display of field 
2. 
3. Specify the indicator you wish to CONTROL PROTECTION of field FLDnnnnn: 
4. 
5. INDICATOR VALUE: (Y __) 
6. 
Le 
8. 
9. NOTE: If the first character of the INDICATOR VALUE is a ''Y'', the field will be 
190. protected when the indicator is on; if an ''N'' is specified, the field will 
11. be protected when the indicator is off. 
12. 
13. F-KEY 13 will provide help. 
14. 
Figure 3-15. Dialog Screen 6 
You can use the Y _ — _ indicator syntax where a field is protected when the indicator 
is on; or you can use the N — — ~— indicator syntax where the field is protected when 


the indicator is off. (Use of the Y O00 unconditional syntax is permitted, but not the 
unconditional N O00 syntax.) 


A protected bidirectional field returns either a program-supplied or user-supplied value to 
your program. A protected input field returns blanks, zeros, or a default constant 
(supplied on dialog screen 2). If your program sets both a retain and a protection 
indicator on, the value returned to your program is the retained value. 
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NOTES: 


1. If you set a protection indicator on when a format is first displayed and on a 
subsequent output operation you reset the protection indicator, an SFO8 error 
message is displayed. 


2. On UNISCOPE 100/200 devices, a field can’t be conditionally protected and 
retained. 


3.5.7. Dialog Screen 7 (Field Change Notification) 


Dialog screen 7 is the notification of field change dialog. This screen is presented when 
notification of field change is requested on dialog screen 1 and does not apply to 
output only variables. Figure 3-16 shows a dialog 7 display for a sample field called the 
SOCIAL SECURITY FIELD. | 


- SOCIAL SECURITY: 999-99-9999 

5. Specify the indicator you wish to control notification of FIELD CHANGE for 
? field FLDQ0007: 

. INDICATOR VALUE: (__) 

8. 

9. NOTE: This indicator value will be set (i.e., turned 'ON') if this field is 
a changed on input. 

12. 


Function key #13 will provide help. 


Figure 3-16. Dialog Screen 7 


The indicator value on line 6 must be specified (you must enter a number ranging from 
1 to 255). This indicator value will be set (i.e., turned on) if this field is changed on 
input. 
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3.5.8. Dialog Screen 8 (Input Field Range Checking) 


Dialog screen 8 lets you set range check values for input and bidirectional fields. Figure 
3-17 shows a dialog screen 8 display for a sample field called the SOCIAL SECURITY 
FIELD. 


A SOCIAL SECURITY: 999-99-9999 

2. 

3. Specify type of CHECK and RANGE VALUEC(S) for field FLD00007: 
4. 

5. Range check (1): 1 BETWEEN 2 LESS THAN 3 GREATER THAN 4 EQUAL 
6. 5 NOT EQUAL 6 LESS/EQUAL 7 GREATER/EQUAL 
7. Range value(s): | 
8. 

9. 

10. 

11. 

12. More? (1): 1NO 2 YES 

13. 





Figure 3-17. Dialog Screen 8 


Range checking simply means that data an operator enters in an input or bidirectional 
field is checked to see if it is within range (between, greater than, less than, etc) of a 
set of values that you specify. You can specify range checking for numeric, 
alphanumeric, and alphabetic fields. The range check values themselves can be numeric 
or alphabetic. You select the type of range check on line 5 and supply the range value 
on line 8 (and line 9 if you specified BETWEEN). 


You should be aware that range values displayed on dialog screen 8 will be incorrect 
when performing a MODIFY or CREATE-FROM operation on a packed, binary, or zoned 
field for which range values have been defined. This does not affect input processing; 
therefore, type in the desired range values and transmit. 


NOTE: 


For BETWEEN range checks, you must enter two values, and the first value must be 
less than the second value. 


The field in our example is a numeric input field defined as 999-99-9999. If BETWEEN 
is specified, the input value must either fall between the two values or be equal to one 
of the two values that you supply (overwrite) on lines 8 and 9. 


You select 1 BETWEEN on line 5. 
You supply RANGE VALUES = 195-44-8867 on lines 8 and 9. 
295-67-3563 
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lf you choose any of the other range checks, only line 8 should be overwritten with a 
value. 


You select LESS/EQUAL on line 5. 
You supply 195-44-8867 on line 8. 


You can specify, in any combination, a maximum of 10 range checks for one field by 
overwriting the default value on line 12 with the value 2 (YES). Upon transmission, the 
screen is displayed again for the same field. You may then select another range check 
and supply the corresponding value. 


When multiple range checks are requested, the SFG automatically performs an OR 
operation, which logically unites the combinations for you. Suppose you select 3 
(GREATER THAN) and 5 (NOT EQUAL) as the range checks for a field. The run-time 
value for that field is checked, ensuring that it is either greater than or not equal to the 
range values you specified on line 8. 


An error condition is indicated at run time if the value for a field doesn't pass the range 
check specified. You may make provisions within your program in the event that a 
workstation operator is unable to correct the error. Range checking is suppressed under 
the following conditions: 





= An operator doesn't enter data in a field. (Even though the input value returned to 
your program in this case is zero or blanks and thus might not meet the range 
check values specified, they aren't checked.) 





An operator doesn't enter data in an input field that has a default value. The default 
value isn't checked. 


= $$1Data that your program sends out to a bidirectional field isn't checked. 


The SFC performs range checking only after it completes other lower-level validation of 
input. For example, if an operator enters numeric data in an alphabetic field, the SFC 
detects the error before it subjects the data to a range check. 


NOTE: 


Lowercase to uppercase translation occurs before range checking is applied. Therefore, 
if you enter alphabetic range values on dialog screen 8 in lowercase and you specified 
lower to uppercase translation on the characteristics screen, the data an operator enters 
always fails. 


When you transmit dialog screen 8 after specifying the tenth range check or after 
answering 1 (NO) to the question on line 12, dialog screen 1 is automatically 
redisplayed for the next field requesting dialogs. If, however, no other fields request 
dialog, the home screen is automatically presented for you to select another function. 
The creation of the format is complete. 
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3.5.9. Default Values for Dialog Screens © 


If dialogs aren’t requested, certain default characteristics are automatically assumed for 
the field. These defaults are: 


m= = For numeric and numeric-edited fields 
1. Field ID: SFG-provided ID is accepted. 
2. Insertion characters: None 
3. Protected edit characters: None 


4. Internal usage: Display (zoned for those fields defined with a sign (+, —, CR, 
DB) on the type attribute screen) 


9. Internal length: SFG-computed length is accepted. 
6. Range checking: None 
7. Conditional display: No (Field always appears.) 
8. Conditional retention: No 
9. Special display properties: No Sd 
10. Conditional protection: No 
11. Replenishing value for | or B fields: Underlines 
12. Field response: OPTIONAL (zero for numeric fields) 
13. Fields are right-justified with zero padding. 
= @§=For alphabetic and alphanumeric edited or nonedited fields 
1. Defaults 1 — 11 for numeric fields apply to alphabetic and alphanumeric fields. 
2. Field response: OPTIONAL (blanks) 


3. Fields are left-justified with blank padding. 
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3.6. COMPLETING SFG SCREENS — CURSOR POSITIONING AND 
OVERWRITING 


As soon as the SFG is activated, you get a workstation display of the home screen: 





























1. Function (1): 1 CREATE 2 CREATE-FROM 3 MODIFY 4 DELETE 

* 5 SHOW 6 LIST 7 SPOOL 8 TERMINATE 
4. Old format: Format mame: (> ) 

> is in library: File name:  ($Y$FMT ) 
6. Volume: CRES ) 

ie 

8. 

9. New format Format name: ( ) 

10. stored in library: File name: CSYSFMT ) 
11. Volume: (RES ) 

12. File does not exist: Allocate: (902) cylinders 

13. Increment: (01) cylinders 

14. 

i Foe 

16. 

17. 

18. *Function keys are: F1 - GO TO HOME SCREEN F5 — BREAKPOINT SPOOL FILE 
19. F13 - HELP F14 - EXIT HELP 

20. F2@ - RESTORE SCREEN 

21. 


In general, the unprotected value appearing within parentheses following any question is 
the default value (response) for that question. For example, on lines 5 and 10 of the 
home screen, the default for FILE NAME is $Y$FMT. You can either accept that default 
or overwrite it with another acceptable value. 


When overwriting, you must first position the cursor over the default value. When the 
home screen is initially presented, the cursor appears in the upper left-hand corner of 
the screen. You can control its movement by using the following keys: 


Cursor to HOME key 
Cursor scan keys 


Tab FWD or tab back keys 


The results produced by using any of these keys are essentially the same. The cursor 
moves, but automatically stops and positions itself over the first default value. Refer to 
the interactive services command and facilities user guide/programmer reference for the 
specifics concerning control of the cursor’s movement. 
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You can enter another acceptable value in the parentheses or keep the default value and 
simply move the cursor to another position. Keep in mind that the action of overwriting 
causes the cursor to move automatically to the next unprotected character. 


NOTE: 


In this manual, sample user entries on SFG screens are shown in reverse lettering (white 
characters on black background), for example: qJ 


Once the home screen is completed, you transmit it by pressing the XMIT key. If, for 
example, the function you chose on line 1 was CREATE, the characteristics screen is 
the next screen that appears: 


COON O WF WN wo 


‘Oo 






SPECIFY THE GLOBAL CHARACTERISTICS FOR FORMAT ABC 







Error retry count: (02) 
Alphabet: (ENGLISH ) 






Lower case transtation? (1): 1 YES 2 NO 





Screen format is (1): 1 ORIGINAL 2 OVERLAY 









(1): 1 NONE 2 REPLENISH 
3 ERASE 4 UNLOCK KEYBOARD 
CONDITIONAL INDICATOR 






Screen erase/unlock option 








Transmit all-disregard cursor position? (1): 1 NO 2 YES 









Special editing characters? NO 
Special display control? (1): 1 NO 2 YES 








Error message field to be defined? (1): 1 NO 2 YES 
Display retention on all fields? (1): 1 NO 2 YES 
Function command keys to be defined? (1): 1 NO 2 YES 






Format has a non-displayed constant? (1): 1 NO 2 YES 


The rules for positioning the cursor on the home screen also apply to the characteristics 
screen. You can transmit the characteristics screen whenever you finish all the 
necessary overwriting. For example, if you only want to change a value on line 10, 


Screen erase/unlock option (2): 1 NONE 2 REPLENISH 
3 ERASE 4 UNLOCK KEYBOARD 
5 CONDITIONAL INDICATOR 
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you may transmit the characteristics screen immediately after you overwrite the 1 on 
that line. The default values for the following lines are automatically accepted. If you 
change all these values, the cursor must be at the bottom of the home screen before 
transmission. Remember, if you don't change any of the values, you simply transmit the 
characteristics screen after it appears. 


If you make mistakes while completing any SFG screen, transmission doesn’t occur. In 
general, the screen is redisplayed and any errors are highlighted. 


NOTE: 


lf you overwrite any of the values on a screen, before transmitting make sure that you 
position the cursor past the last default value you overwrote on the screen. 


These general rules for completing the home screen and characteristics screen apply to 
other SFG displays, such as optional and dialog screens. 


lf you have difficulty completing a screen at any point, you can initiate the HELP function 
(3.8). 


For more information concerning workstation operation, refer to the interactive services 
commands and facilities user guide/programmer reference. 


3.7. ERROR AND WARNING MESSAGES 


There are certain instances when an entry on the home screen may be syntactically 
correct but violates an SFG logical rule. In these instances, blinking does not occur. 
Instead, one of the following messages is displayed on the workstation screen. 


& SFG2@ OLD FORMAT __§ __ ____ DOES NOT EXIST. 


The format specified as OLD FORMAT cannot be found. You should check to see if 
the spelling of the format’s name is correct, or you might check the contents of the 
format library (SYSFMT or a user-assigned library), via the librarian or the FSTATUS 
system command, to see if that format actually exists. 


m SFG11 FORMAT ~~~ ~~~ IS LARGER THAN CURRENT SCREEN. 
This message indicates the format is larger than the screen size. For example, a 


format of 24 lines cannot be displayed and consequently cannot be modified on a 
workstation screen with a 12-line capacity. 
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These messages (SFG20 and SFG11) require corrective action. You must enter another 
format name before you can transmit the home screen. Messages SFG21 and SFG23 
are only warning messages. Corrective action may be taken; however, no action is 
required. 


5 SFG21 NEW FORMAT. _- —~ _ ALREADY EXISTS. TO REPLACE, TRANSMIT. 


This message indicates that the current format name is the same as an existing 
format name. If you don't want the old format name replaced, change the name of 
the new format. If you do want the old format replaced, position the cursor to the 
end of the format and transmit. 


a SFG22 FC TYPE ELEMENT NOT FOUND FOR FORMAT __ _ ____— 


This message indicates the format element type ‘‘F’’ exists but the ‘‘FC’’ type does 
not exist. Use the MODIFY option to create your new format using the old format 
name. 


a SFG23 (WARNING) ___§ ___ __ _ LANGUAGE TABLE NOT FOUND IN FRMTOUT. 


This message indicates that a language other than English was specified on the 
home screen and that the output file into which the SFG is to write the format does 
not have a character set translation for that language. 


Again, this is a warning message only. You may go ahead and build the format (by 
positioning the cursor to the bottom of the screen and transmitting); however, note 
that a translation table must be supplied for the file before the SFC can use the 
format. 


™ $SFG9@ FUNCTION IS NOT SUPPORTED 
This message indicates the function requested on the home screen, the function 
key, or some other specification requests a nonexistent function or feature. Correct 


and rerun. 


The system messages programmer/operator reference lists these messages, as well as 
other error messages you may get while using the SFG or the SFC. 
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3.8. THE HELP FUNCTION 


In 1.3, we mentioned that an ease-of-use feature accompanying the SFG is its capability 
to provide prompting for any procedure with which you might be having difficulty. This 
capability is the HELP function. 


You may request help once the home screen is displayed and anytime during the SFG 
session simply by pressing the function shift key in combination with the F13 function 
key. You then get the appropriate screen that tells you how to complete the operation 
for which help was requested. You can return to the point in the SFG session where 
you originally left off by using the F14 function key. 


Let's say that you ve been presented with the home screen and selected the CREATE 
function, but you’re not quite sure about completing the rest of the screen. If you 
request help, the appropriate set of instructions for completing the home screen will be 
displayed. 


The HELP function can be initiated in this manner at any point in the SFG session. 
Whether you're in the middle of creating a format or modifying one, you can ask the 
SFG for help whenever it’s necessary. 
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4. Creating Screen Formats 


4.1. CREATING A SIMPLE SCREEN FORMAT 


A simple format is one where all the SFG defaults are accepted and no optional or 
dialog screens are required. Such a format is included here to demonstrate the basic 
steps needed to create a usable screen format. Once you're familiar with this procedure, 
it will be easier to go on to the discussion of more complex formats later in this 
section. 


Taole 4—1 shows the sequence of steps involved in creating a simple format. 


7 Table 4-1. Basic CREATE Function Steps (Part 1 of 2) 


Log onto the system. 
Press XMIT key 


2 
3 
4 

















Activates the SFG and displays the 
home screen 





1. 
screen. 


8. Accept library defaults. 


Provides name of format and where 
it will be stored 





Press XMIT key. 









10. Complete pass 1 — template screen. Provides actual format layout with 
display constants and variable 


data field representation 












11. Press XMIT key. 





Provides type attributes and 
editing for variable data 


12. Complete pass 2 — type attribute 
screen. 


13. Press XMIT key. 
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Table 4-1. Basic CREATE Function Steps (Part 2 of 2) 


14. Complete pass 3 — |/O screen. 
15. Press XMIT key 
6. 


1 Terminate (enter 8 on line 1 of Terminates the SFG session 
the resulting home screen). 


Recall from Section 3 that the home screen appears after you activate the SFG. You 
complete the home screen as follows: 






Indicates direction of data flow 
between the program and the format 














= Accept the default value (1) CREATE for the function on line 1. 
= ###Provide a name for your format on line 9. 

= Accept the defaults for the library on line 10. 

= Transmit the home screen. 


As an example, suppose you were creating a format called MYSCREEN. After you 
complete the home screen, but before you transmit it, it should look like this: 






































1. Function (1): 1 CREATE 2 CREATE-FROM 3 MODIFY 4 DELETE 
2. 5 SHOW 7 SPOOL 8 TERMINATE 
3. 

4. Old format: Format name: ( ) 

a. is in library: File name: (SYSFMT ) 
6. Volume: (RES 

re 

8. 

9. New format: Format name: ((RaN) 

16. stored in library: File name: (S$YS$FMT ) 
11. Volume: CRES ) 

12. File does not exist: Allocate: (002) cylinders 

13. Increment: (01) cylinders 

14. 

15. 

16. 

17. 

18. *Function keys are: F1 -— GO TO HOME SCREEN F5 - BREAKPOINT SPOOL FILE 
19. F13 - HELP F14 - EXIT HELP 

20. F2@ - RESTORE SCREEN 

21. 

22. 

23. 

24. 
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After you transmit the home screen, the characteristics screen is automatically 
displayed: 








































1. SPECIFY THE GLOBAL CHARACTERISTICS FOR FORMAT xxxxxxxx: 

2. 

3% Error retry count: (02) 

4. Alphabet: (ENGLISH ) 

oe 

6. Lower case translation? (1): YES 2 NO 

7. 

8. Screen format is (1): 1 ORIGINAL 2 OVERLAY 
9. 

10. Screen erase/unlock option (1): 1 NONE 2 REPLENISH 
11. 3 ERASE 4 UNLOCK KEYBOARD 
12. 5 CONDITIONAL INDICATOR 
13. 

14. Transmits all-disregard cursor position? (1): 1 NO 2 YES 

15. 

16. Special editing characters? (1): 1 NO 2 YES 

17. Special display control? CDs 1 NO 2 YES 

18. 

19. Error message field to be defined? (1): 1 NO 2 YES 

20. Display retention on all fields? (1): 1 NO 2 YES 

21. Function command keys to be defined? (1): 1 NO 2 YES 

22. 

23. Format has a non-displayed constant? (1): 1 NO 2 YES 

24. 


Since this is a basic format, you accept all the defaults by simply transmitting the 
screen. 


This gives your format the following characteristics: 

= The error retry count is 2. 

= ~=§©«English alphabet is used. 

= # Lowercase translation is used. 

= The format is an original format, not an overlay. 

m Screen erase/unlock option is NONE. 

ws Input will not be returned to the user program displayed on the screen. 


= Your format will not use special editing characters, special display control, or an 
error message field. 
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= Your format will not retain the contents of variable data fields on the workstation 
screen. 


= Your format will not use function keys, nor will it have a nondisplayed field. 


After you transmit the characteristics screen, you're presented with a blank workstation 
screen to key in the format layout. This step is called pass 1. 


4.1.1. Pass 1 — Providing the Layout 


When the blank screen is presented, you simply lay out your format by positioning the 
cursor to points on the screen that you choose and by keying in any display constants 
and underlines representing the external length of the variable data fields. The number 
of lines that a format can contain, as well as the maximum length of its longest line, is 
limited to the physical size of the workstation screen. Also, the length of a variable data 
field is limited to the length of one line. Continuation of a variable data field on the 
following line is not permitted. 


Figure 4—1 illustrates what a completed template screen might look like: 












STUDENT GRADE REPORT 
NAME: 


ee ee eee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee ee 
— oe ee oe 


SECTION: ___ 
INSTRUCTOR: 


FINAL COURSE GRADE: _ 





“NO UI & W AD on 


Figure 4—1. Typical Template (Pass 1) Screen 


This screen can be analyzed as follows: 
= Line 1 


Contains three display constants and two variable data fields. The display constants 
are STUDENT GRADE REPORT, the slash (/), and the /82. Both data fields are 
represented by two underlines (_ _), indicating an external length of two character 
positions. | 
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Line 2 


Contains one display constant and one field. The display constant is NAME:, and 
the field is represented by 30 consecutive underlines. 


Line 3 


Contains one display constant (STUDENT NUMBER) and one variable data field (five 
underlines). 


Line 4 


Contains two display constants (COURSE NUMBER: and one hyphen) and two fields 
(two and four consecutive underlines, respectively). 


Line 5 


Contains one display constant (SECTION:) and one field (three consecutive 
underlines). 


Line 6 


Contains one display constant (INSTRUCTOR:) and one field (30 consecutive 
underlines). 


Line 7 


Contains one display constant (FINAL COURSE GRADE:) and one field (one 
underline). 


Although completion of pass 1 is simple, there are some general notes to keep in mind. 


1. 


The external length of a variable data field is always expressed by consecutive 
underlines. 


Any character other than an underline is considered a display constant. 
Display constants are always protected. 
Display constants will appear on the completed format exactly the way you enter 


them. Thus, lowercase display constants remain in lowercase and uppercase 
display constants remain in uppercase. This doesn't apply to Katakana characters. 
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If you specify at least one display constant but no variable data fields, the format’s 
creation is complete as soon as you transmit the template screen. After 
transmission, the home screen appears again for you to select another function. 


lf you specify at least one variable data field and press the XMIT key, that field is 
redisplayed for you to complete pass 2. 


You can use the F13 function key to initiate the HELP function at any point during 
the completion of pass 1. 


You can terminate pass 1 at any point by pressing the function shift in combination 
with the F1 key. No format is created, and the home screen is displayed for you to 
select another function. 


The cursor must be at the end of the screen format you're defining before you 
press the XMIT key. 


If you press XMIT before moving the cursor (before making any entries on the 
blank screen), the following message appears: 


SFG12 NO DATA ENTERED - POSITION CURSOR TO END OF SCREEN, XMIT 


If this happens, simply make the desired entries and transmit. 
The limit for the number of variable data fields on a screen format is 255. If a 
greater number of variables (group of underscores) is entered, or if the format 
specified is too large for the generator to handle for any reason, the following 
message is displayed: 

SFG1@ NO. OF VARIABLES OR CHARACTERS IN FORMAT IS TOO LARGE. 


Processing returns to the home screen. 


4.1.2. Pass 2 — Specifying Type Attributes and Editing 


When you transmit the finished template screen, it is automatically redisplayed for you 
to specify the type attributes and edit characters for all the variable data fields. The 
type attributes specified indicate the kind of data (numeric, alphanumeric, alphabetic) this 
field will receive when the format is being used to input and output data. Basically, you 
use COBOL-like picture clauses to define field type attributes and editing characters. 
Refer to Section 2 for rules governing type attributes and editing. Figure 4—2 illustrates 
what a completed type attribute screen looks like. 
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NO WE W DR mw 











STUDENT GRADE REPORT 99/99/82 
STUDENT NUMBER: 99999. 
COURSE NUMBER: XX-9999 
SECTION: 999 
INSTRUCTOR: A 


FINAL COURSE GRADE: 









Figure 4-2. Typical Type Attribute (Pass 2) Screen 


This screen can be analyzed as follows: 


Line 1 
Contains two fields that are defined as numeric: 99 and 99. 
Line 2 


Contains one alphabetic field. The A in the first position indicates that the entire 
field is alphabetic. 


Line 3 

Contains one numeric field (99999). 

Line 4 

Contains one alphanumeric field (XX) and one numeric field (9999). 
Line 5 

Contains one numeric field (999). 

Line 6 


Contains one alphabetic field. The A in the first position indicates that the entire 
field is alphabetic. 


Line 7 


Contains one alphabetic field (A). 
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Some rules that apply to the completion of the type attribute screen are: 


1. 


10. 


11. 


You may not specify a protected area as the first part of an input field. For 
example, a field defined in pass 1 as _ _ — _ may not appear as $999 or !AAA in 
pass 2. Doing so will cause input to be returned incorrectly at run time. 


The last type attribute character specified for a field is assumed for the rest of that 
field. For example, AL — — — — denotes an entire alphabetic field. 


An exclamation point (!) may be used in alphabetic, alphanumeric, and numeric 
fields to indicate that an insertion character is required. The exclamation point may 
not be used if any other edit characters are specified. 


lf you specified one or more special edit characters for numeric-edited fields, via 
the edit screen, you must use these characters on the type attribute screen. The 
edit screen is discussed in 3.4.3. 


Numeric edited fields containing any acceptable combination of the floating insertion 
sign $, +, or —; the character CR or DB; or the suppression/replacement character 
* are always output fields, and are completely protected like all other output fields. 
The suppression character Z is bidirectional or output, and is also completely 
protected when used as output only. It is for this reason that you aren't asked to 
specify any edit characters to be protected. 


The preceding rule also applies to alphanumeric fields containing the edit character 
B or zero (Q). 


Floating insertion or suppression/replacement editing cannot be used with the CR 
or DB characters. 


You can initiate the HELP function at any time during pass 2. 


Defining an input field with more than one data type results in tab placement at the 
beginning of each data type. If, for example, you define an input field as AAA999 
in pass 2, the cursor will stop at position 1 and then 4 when the format is 
displayed by a program on a workstation or UTS 400 and tabbing begins. 


You can terminate pass 2 at any point by pressing the function shift key and the 
F1 function key. All entries for the type attribute screen and the preceding template 
screen are ignored, and no screen format is created. The home screen is 
automatically displayed for you to select another function. 


lf there are any errors on the type attribute screen, it will be redisplayed when you 
press the XMIT key, and the errors will be blinked. 
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12. Errors must be corrected before transmission of the screen can occur. 
13. The cursor must be beyond the last character before you press the XMIT key. 


After you transmit the type attribute screen, you are ready to proceed to pass 3. 


4.1.3. Pass 3 — Specifying !/O Directions and Initiating Dialogs 


When you transmit the type attribute screen, the template screen is displayed for you 
to specify the input and output directions for each field in the format. (This is also the 
step where you initiate dialog screens if they’re required.) Figure 4-3 shows a typical 
initial 1/O screen display. 









STUDENT GRADE REPORT 0 /0_/82 






STUDENT NUMBER: O __ 
COURSE NUMBER: 0 _-O 
SECTION: O __ 

INSTRUCTOR: O.  — ———i‘“‘“‘i;itCtS 
FINAL COURSE GRADE: 0 














Figure 4-3. Typical Initial 1/O (Pass 3) Screen 


The only difference between this and the template screen is that the letter O is 
displayed in the first position of each field. 


The letter O signifies that the default I/O direction for the fields is output. You can 
overwrite this default with either an | for input or a B for both input and output, 
depending, of course, on the specific application of the format in a program. If you want 
to accept all of the defaults, simply transmit the 1/O screen. 


The effects of these I/O directions on the fields of the format are: 

= O - For Output 
Indicates that the field will only be used to display variable data from a program at 
run time. Any data displayed in an output field is always protected and cannot be 


altered until new output data from you program overwrites it or until the entire 
format is erased. 
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| — For Input 


Indicates that the field will only be used for variable data entered by the 
workstation operator. This input will be passed to the program at run time. Input 
fields are unprotected (except possibly for certain edit characters). 


B — For Both (input and output, or bidirectional, fields) 


Indicates that the field will be used to display variable output or to enter variable 
input. Bidirectional fields are also unprotected. A _ bidirectional field is always 
expected to display output the first time the format from your program is displayed 
at the workstation (see 1.3.2.2). 


Some general rules pertaining to the completion of the 1/O screen are: 


1. 


Numeric edited fieids containing any acceptable combination of the floating sign §$, 
+, or —; the character CR or DB; or the suppression/replacement character * are 
always output fields, and are completely protected like all other output fields. The 
suppression character Z is bidirectional or output, and is also completely protected 
when used as output only. Therefore, any numeric-edited field represented in this 
manner in pass 2 must be defined as an output field in pass 3. Specifying anything 
other than an O (for output), an exclamation point (for dialogs), or an underline (for 
dialogs) results in an error condition (blinking). 


The preceding rule applies to alphanumeric fields containing the characters B or O 
(zero). 


You can initiate the HELP function at any time during the completion of pass 3. 
You can terminate the 1/O screen at any time by pressing the F1 function key. All 
entries for this and preceding passes are ignored, and no screen format is created. 


The home screen is automatically displayed for you to select another function. 


If there are any errors in the |/O screen when you press the XMIT key, the screen 
is redisplayed, and the errors are blinked. 


Any errors must be corrected before transmission of the screen can occur. 


The cursor must be positioned after the last specification entered on the I/O screen 
before you press XMIT. 


If dialogs are not requested, format generation is complete. The format is stored on 
the library specified on the home screen, and the home screen is redisplayed. 
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® In many cases, completion of the |/O screen is the last step in creating a format. Using 
our simple example, we can review all three passes. 


m Pass 1: You provide the format layout and transmit. 










STUDENT GRADE REPORT 





NAME: 





SECTION: —__ 
INSTRUCTOR: 
FINAL COURSE GRADE: _ 


m= Pass 2: You specify type attributes and editing and then transmit. 










STUDENT GRADE REPORT 99/99/82 





STUDENT NUMBER: 99999 
COURSE NUMBER: XX-9999 

SECTION: 999 

INSTRUCTOR: A 
FINAL COURSE GRADE: 









= Pass 3: You specify input/output directions and transmit. For the example format, 
suppose all the fields are input fields. Pass 3 would look like this: 











STUDENT GRADE REPORT I_/I_/82 
STUDENT NUMBER: I tsi—‘i‘—s~S 
COURSE NUMBER: I _-I _ 
SECTION: I __ 
INSTRUCTOR: I 


FINAL COURSE GRADE: I 





When the I/O screen is transmitted, the format is complete and the home screen is 
redisplayed for you to choose another function. 
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4.2. CREATING MORE COMPLEX FORMATS (USING OPTIONAL AND 
DIALOG SCREENS) 


The format created in 4.1 is a basic format. It doesn't require additional controls over 
any run-time characteristics, nor does it contain any edited fields. Not all formats are 
that simple, however. Many formats do require edited fields and are more effective 
when certain features of the format are altered. This subsection illustrates how formats 
are created with dialog and optional screens. These additional screens provide more 
stringent controls over a format’s run-time features. 


4.2.1. A Sample Format 


Suppose you needed a format for a program that gathers information on purchase 
orders. The purchase orders are from companies that regularly place an order every 
month. Though the companies are the same every month, the items they order and their 
quantities do vary. 


The user program is to display a format, outputting the name and address of the 
company placing an order. The order entry clerk enters the date of the order, the item 
name, quantity, stock number, price, and the date required. These are the format’s input 
fields. 


The program must ensure that the stock number is a valid one. If valid, the ordering 
information from the input fields is passed back to the program and added to a file. The 
input fields are then replenished to permit entry of the next order date, item, stock 
number, etc, for that company. If the stock number is invalid, the program blinks the 
number and outputs an error message to the format. 


When the order entry clerk has entered all the items for a particular company, he enters 
an item name of ail zeros (O). This directs the program to display the name and address 
of the next company in the file. 


To meet all these specifications, the format requires these optional screens: 


= $The conditional erase/replenish screen. A conditional indicator supplied on this 
screen controls when the format’s input fields are replenished. Remember that if 
one customer orders more than one item, only the input-only fields are replenished, 
not the output fields that contain the customer name and address. 


m= The error message screen. The format needs an error message field to notify the 
order entry clerk that he has entered an invalid stock number. 
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e The dialog screens needed and the fields that need them are: 


STOCK NUMBER 


Dialog Screen 1 

Always the first dialog screen presented. Needed to prompt subsequent 
dialogs, specify field direction, and provide information about the field's internal 
usage. 


Dialog Screen 2 


Always presented for input fields that require dialogs. Needed to specify 
operator response and any replenishing or default values. 


Dialog Screen 4 


Needed to specify special display control for this field. When an order entry 
clerk enters an invalid stock number, the field blinks. 


UNIT PRICE 


Dialog Screen 1 

This dialog is especially important for the UNIT PRICE field, because it will be 
an edited field. In addition to the functions noted for the STOCK NUMBER, this 
dialog also lets you specify protection for a decimal point and comma 
associated with this field. 

Dialog Screen 2 


Serves the same function as dialog screen 2 for STOCK NUMBER. 


The steps needed to create the format described are summarized in Table 4—2. 
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Table 4-2. CREATE Function Steps Using Optional and Dialog Screens 


ee es en 


Log onto the system. Activates the SFG and displays the 


home screen 
Press XMIT key. 


Key in RV SFGEN 









Select 1 (CREATE) from home screen Provides information about where 


the format will be stored 


2 
3 
4 
6 
8 
9 


1 
Press XMIT key. 
Complete characteristics screen Provides information related to 
format as a whole; prompts 
1 Press XMIT key. optional screens 
1 
1 


Provides more detailed information 
about format as a whole 


Press XMIT key. 
1 Complete pass 1 — template screen. 








Provides actual format layout with 
display constants and variable data 
field representation 








1 Press XMIT key. 


Provides type attributes and editing 
for variable data 


0 
2 
3 
4 
15. Complete pass 2 — type attribute screen 
16. Press XMIT key. 
17. Compiete pass 3 — I/O screen. 
8 

9 


1 Press XMIT key 





Indicates direction of data flow 
between the program and the 

format. May initiate dialog screens 
for one or more fields 











Provides further information about 
specific fields 


1. Optional. Complete any optional screens 


O. Press XMIT key. 






1. Terminate (enter 8 on line 1) the Terminates the SFG session 
resulting home screen if no 


further functions are required. 


1 Optional. Complete any dialog screens 
2 
2 
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4.2.1.1. The Sample Home Screen and Characteristics Screen 


After you activate the SFG, the home screen is displayed for you to choose a function, 
name your format, and indicate its library. The completed home screen for the example 
format is: 


CON AU EWN = 















1 CREATE 2 CREATE-FROM 5 MODIFY 4 DELETE 
> SHOW 6 LIST 7 SPOOL 8 TERMINATE 


FUNCTION 














OLD FORMAT: Format name: ( ) 


is in library: File name: (SYSFMT ) 
| Volume: (RES) 


New Format: Format name: ((RGES) 

stored in library: File name: ((3ggNS ) 
Volume: (aera 

File does not exit: Allocate::  (@i)) cylinders 
Increment: (01) cylinders 





*Function keys are: F1 - GO TO HOME SCREEN F5 - BREAKPOINT SPOOL FILE 
F13 - HELP F14 -— EXIT HELP 
F2® - RESTORE SCREEN 


On line 1, you accept the default (1 CREATE). The format name (MYFORMAT) is 
supplied on line 9. This format won't be stored on the $Y$FMT file. Instead, it will be 
stored in the file MYFILE (shown on line 10) on the volume MYVOL1 (shown on line 
11). Since space for MYFILE was not previously allocated, five cylinders are specified 
on line 12, and the INCREMENT default of 1 is accepted. 
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Once you transmit the home screen, the characteristics screen appears. It is completed 
as shown: 


1. SPECIFY THE GLOBAL CHARACTERISTICS FOR FORMAT MYFORMAT: 

2% 

Le Error retry count: (@2) 

4. Alphabet: (ENGLISH ) 

2% 

6. Lower case translation? (1): 1 YES 2 NO 

ie 

8. Screen format is (1): 1 ORIGINAL 2 OVERLAY 
9. 

10. Screen erase/unlock option (BR): 1 NONE 2 REPLENISH 
11. 3 ERASE 4 UNLOCK KEYBOARD 
12. 5 CONDITIONAL INDICATOR 
13. 

14. Transmit all-disregard cursor position? (1): 1 NO 2 YES 

15. 

16. Special editing characters? (1): 1 NO 2 YES 

17. Special display control? (1): 1 NO 2 YES 

18. | 

19. Error message field to be defined? (2): 1 NO 2 YES 

2¢. Display retention on all fields? (1): 1 NO 2 YES 

21. Function command keys to be defined? (1): + NO 2 YES 

22. 

a Ie Format has a non-displayed constant? (1): 1 NO 2 YES 

24. 


All the SFG defaults are accepted with two exceptions: 
m Screen erase/unlock is by CONDITIONAL INDICATOR (line 10) 
= An error message field is requested on line 19. 


By specifying CONDITIONAL INDICATOR for the screen erase/unlock option (line 10), 
you prompt the display of the conditional erase/replenish screen. Similarly, by 
responding with 2 for YES on line 19, you prompt the error message screen. 


After you transmit the characteristics screen, the conditional erase/replenish screen is 
the first of the optional screens to appear. 


4.2.1.2. The Conditional Erase/Replenish Screen for MYFORMAT 


Recall from 3.4.2 that you can specify a conditional indicator that controls when input 
fields are replenished. For the sample format, you want input fields replenished after an 
order entry clerk has filled them in. To this condition, suppose you assign an indicator 
number of 1. When you complete the conditional erase/replenish screen, it should 
appear as: 
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Ts ENTER THE CONDITIONAL ACTION DESIRED AFTER INPUT FOR FORMAT MYFORMAT: 
ve 

3:3 Do you wish all input-only fields to be REPLENISHED after input based upon a 
4. conditional indicator? 

5. 

6. (#): 1NO 2 YES INDICATOR VALUE: (CY fJ___) 

ae 

8. Do you wish to have the screen ERASED after input based upon a 

os conditional indicator? 

10. 

11. (1): NO 2 YES INDICATOR VALUE: (CY __ 

12. 





4.2.1.3. The Error Message Screen for MYFORMAT 


After you transmit the conditional erase/replenish screen, the error message screen 
automatically appears. (For a complete discussion of the error message screen, see 
3.4.5.) To meet the needs of the sample format, you complete the error message as 
shown here: 























iis ENTER THE FOLLOWING INFORMATION FOR YOUR ERROR MESSAGES FOR FORMAT MYFORMAT: 
25 

3. Message field name is: (CERRORMSG) 

4. 

5. Number of Lines in error message: (1) ENTER 1 OR 2 

6. Error message to be displayed on line number: (LAST) ENTER NUMBER OR 'LAST' 
ae 

8. Error messages conditionally displayed: indicator (Y @__) 

9. 

10. DISPLAY ATTRIBUTES: Intensity (A) 

11. Emphasis: (4 __) 

12. 

13. 

14. 

15. 

16. Intensity: Emphasis: 

17. A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
18. B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 
19. 3. STRIKE THRU BARS 
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The name of the error message field is ERRORMSG (the default). The number of lines 
for the message is 1 and when it appears, it is displayed on the last line of the format. 
The indicator number specified is 2. Therefore, when that indicator is on, the error 
message is displayed. (Note that the actual contents of the error message must be 
defined in your program.) When the error message appears, it is displayed in reverse 
video. 


Once you complete and transmit the error message screen, you're ready to lay the 
format out. 


4.2.1.4. Completing Pass 1 for MYFORMAT 
The rules concerning the layout (pass 1) of the sample format are the same as those 


discussed in 4.1.1 for the simple format. You simply key in the display constants and 
indicate variable data fields with underlines. The template for MYFORMAT is: 


PURCHASE ORDER REPORT 


CUSTOMER NAME: 
ADDRESS: 
DATE OF ORDER: _ 


ITEM NAME: 
QUANTITY: ___ 
DATE REQUIRED: __ 





4.2.1.5. Completing Pass 2 for MYFORMAT 


After you transmit the template (or pass 1) screen, it is redisplayed for you to complete 
pass 2. In pass 2, you fill in the type attributes for the various fields. (Refer to 4.1.2 for 
the rules concerning pass 2.) The type attribute screen for MYFORMAT is: 






PURCHASE ORDER REPORT 











CUSTOMER NAME: Xs 
ADDRESS: X STATE: A_ ZIP: 9_ 


DATE OF ORDER: 99/99/99 
ITEM NAME: Xs 


STOCK NUMBER: 999999 QUANTITY: 999 
UNIT PRICE: $9,999.99 DATE REQUIRED: 99/99/99 







CON O UE WR ea 
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The screen can be analyzed as follows: 


Line 3 
Contains one alphanumeric field (CUSTOMER NAME). 
Line 4 


Contains three fields: one alphanumeric field (ADDRESS), one alphabetic field 
(STATE), and one numeric field (ZIP). 


Line 5 

Contains three numeric fields separated by slashes (DATE OF ORDER) 

Line 6 

Contains one alphanumeric field (ITEM NAME). 

Line 7 

Contains two numeric fields (STOCK NUMBER and QUANTITY). 

Line 8 

Contains four numeric fields (one for UNIT PRICE and three, separated by slashes, 
for DATE REQUIRED). The UNIT PRICE field is edited ($9,999.99). Later in the 
creation process (dialog screen 1) you can specify protection for the comma (,) and 


the decimal point (.). You may do this only for fields that are going to be used for 
input or both input and output. Output fields are always protected. 


4.2.1.6. Completing Pass 3 for MYFORMAT 


After you transmit the type attribute screen, the after image of pass 1 (the template 
screen) is again displayed for pass 3. In pass 3, you indicate the I/O direction for each 
field (see 4.1.3) and you initiate dialog screens for the fields that require them. 


When the template screen first appears, the letter O (for output) is displayed in the first 
position of each field. Either you overwrite the O with the direction you want, or you 
accept it. 
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If you require dialogs, initiate them for a particular field by: 

@ Overwriting the O with an exclamation point (!) 

# Overwriting the O with an underline 

For certain fields, the SFG initiates dialogs for you automatically. These are: 
m Fields containing the edit character ! 

w Fields containing the edit characters , or . that can be protected. 


The pass 3 screen for MYFORMAT is completed as follows: 







PURCHASE ORDER REPORT 


CUSTOMER NAME: O| sss 
ADDRESS: O|  ————— STATE: O_ ZIP: O__ 


DATE OF ORDER: I_/I_/I_ 
ITEM NAME: 











QUANTITY: I 


DATE REQUIRED: I_/I_/I_ 







The fields CUSTOMER NAME, ADDRESS, STATE, and ZIP accept the O default because 
they are all output fields. The DATE OF ORDER, ITEM NAME, QUANTITY, and DATE 
REQUIRED fields are all defined as input fields and do not require diaiogs. An 
exclamation point (!) in the first character position of the STOCK NUMBER field indicates 
that dialog screens are required for this field. Although the UNIT PRICE field is defined 
as an input field on the screen, dialog screens are automatically initiated for this field 


because it was defined as an edited field in pass 2. 


Once you transmit the I/O screen, the dialog screen 1 for the first field requiring dialogs 


is presented. In the case of MYFORMAT, this field is the STOCK NUMBER field. 
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4.2.1.7. Completing Dialog Screens for MYFORMAT 
Recall from 3.5.1 that on dialog screen 1 you can specify: 
m An alternate field name 

= The I/O direction of the field 

m The internal field length 

= # An edit mask (for edited fields) 

= @§=«6Insertion characters 

m Dialog screens 3 through 7 


For the STOCK NUMBER field, dialog screen 1 is completed as follows: 


1. STOCK NUMBER: 999999 

2. 

3. (FLD@0009) is for field use of (ff): 1 OUTPUT 2 INPUT 3 BOTH 
4. 

5. Internal usage is Ge 1 DISPLAY 2 PACKED 3 BINARY 4 ZONED 
6. Internal length is: (06) 

7. 

8. PLEASE INDICATE WHETHER OR NOT THE FOLLOWING ARE REQUIRED: 

9. Conditional display? (1): 1 NO 2 YES 

19. Special display properties? (@): NO YES 

11. Conditional retention? (1): NO YES 

12. Conditional protection? (1): NO YES 

13. Field change notification? (1): NO YES 

14, Range checking? C1): NO YES 

15: 

s ae 

18. 

19. 
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The SFG default for field name is accepted, and the I/O direction is specified as input. 
You accept the values displayed for internal usage and internal length. Since the 
specifications for MYFORMAT call for blinking the STOCK NUMBER field when an entry 
is invalid, SPECIAL DISPLAY PROPERTIES is selected. The STOCK NUMBER field is not 
an edited field, nor does it require insertion characters. Therefore, lines 16 and 17 are 
blank. 


Since the STOCK NUMBER field is defined as an input field, dialog screen 2 
automatically appears after you transmit dialog screen 1. (Refer to 3.5.2 for a complete 
explanation of dialog screen 2's function.) 


Ke STOCK NUMBER: 999999 

2. 

oe Field response (1): 1 OPTIONAL 2 REQUIRED 3 MUST-FILL 4 DEFAULT VALUE IS: 
4. 

2 

6. Lowercase translation (1): 1 Yes 2 No 

(. 

8. 

9. Initial replenishing value is: 

10. 

11. NOTE: For DEFAULT, alpha characters will be passed to program in upper or 

122 lower case as entered. For REPLENISH, alpha characters will be displayed 
13. as entered. 





For the purposes of MYFORMAT, FIELD RESPONSE must be optional. (Remember that 
when all the items for a particular customer have been entered, all O’s are entered in the 
ITEM NAME field. This signals the program to display the next customer name and 
address. Therefore, the field can't be a MUST-FILL field or a REQUIRED field, nor does it 
need a default value.) No special replenishing value is needed for this field: underlines 
are perfectly suitable for the application. Since all the dialog screen 2 defaults meet the 
field's requirements, simply transmit the screen as is. 


The final dialog screen that appears for the STOCK NUMBER field is dialog screen 4, the 
special display properties dialog. (Refer to 3.5.4 for a discussion of its function.) 
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It should be completed as follows: 




























1. STOCK NUMBER: 999999 

Lis 

So: DISPLAY PROPERTIES FOR FIELD FLDO0009: 

4. 

2 Intensity: Emphasis: 
6. Lowest precedence: I. Default properties (A) ) 
7. II. Option indicator (§@@ ) (&) ) 
8. III. Option indicator (_ ___) (_) , See ) 
9. IV. Option indicator (____) (_) Oa ta ) 
10. Highest precedence: . Option indicator (¢(_ ___) €_) Re etc ) 
Ts 

den 

13. 

14. 

15. Intensity: Emphasis: 

16. A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
17. B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 
18. C. NOT DISPLAYED 3. STRIKE THRU BARS 6. POSITION CURSOR 
VA E. SAME AS FIELDS IN ERROR 

20. 

21. 


On line 7, you supply the indicator number that controls when the STOCK NUMBER field 
blinks. This number is the same as the indicator number specified for the error message 
field. This means that when indicator number 2 is on, it triggers two things: the display 
of an error message on the error message field and blinking of the invalid entry for the 
STOCK NUMBER. Blinking occurs when the indicator is on because the intensity chosen 
for this condition is SAME AS FIELDS IN ERROR (the SFG’s method of highlighting a 
field entered in error). 


Once you transmit dialog screen 4 for the STOCK NUMBER field, dialog screen 1 
automatically appears for the next field requiring dialogs. This field is the UNIT PRICE 
field. Dialog screen 1 is automatically initiated for this field because it is an edited field 
and requires an edit mask for the decimal point and comma within the field. UNIT PRICE 
also prompts dialog screen 2 because it is an input field. The sequence of dialogs 
follows: 
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w Dialog Screen 1 
1. UNIT PRICE: $9,999.99 
Ls 
3. (FLD@0011) is for field use of (Qf): 1 OUTPUT 2 INPUT 3 BOTH 
4. 
5. Internal usage is (1): 1 DISPLAY 2 PACKED 3 BINARY 4 ZONED 
6. Internal length is: (06) 
ie 
8. PLEASE INDICATE WHETHER OR NOT THE FOLLOWING ARE REQUIRED: 
9. Conditional display? (1): 1 NO 2 YES 
19. special display properties? (1): 1 NO 2 YES 
11. Conditional retention? (1): 1 NO 2 YES 
12. Conditional protection? CT): 1 NO 2 YES 
153 Field change notification? (1): 1 NO 2 YES 
14. Range checking? (1): 1 NO 2 YES 
13: 
16. USE A ''/** TO MARK PROTECTED EDIT CHARS IN THE FOLLOWING LINE 
17. $9/999/99 
18. 
19. 
20. 
Note that on line 17, you overwrite the comma and decimal point with a slash, 
indicating that these characters are to be protected. 
m= Dialog Screen 2 
ie UNIT PRICE: $9,999.99 
2. 
ye Field response (1): 1 OPTIONAL 2 REQUIRED 3 MUST-FILL 4 DEFAULT VALUE IS: 
4, So y= 
Dis 
6. Lowercase translation (1): 1 Yes 2 No 
re 
8. 
7% Initial replenishing value is: 
10. : ee ee 
Ves NOTE: For DEFAULT, alpha characters will be passed to program in upper or 
12% lower case as entered. For REPLENISH, alpha characters will be displayed 
13: as entered. 





Since the SFG defaults are appropriate for the UNIT PRICE field, dialog screen 2 is 
transmitted without any modifications. 





®& 
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When you transmit dialog screen 2 for the UNIT PRICE field, creation of MYFORMAT is 
complete. At this point, the home screen is displayed for you to select another function. 
When you run your program, the format the order entry clerk sees is: 











PURCHASE ORDER REPORT 





CUSTOMER NAME: 


ADDRESS: STATE: _) ZIP: 
DATE OF ORDER: /__/__ 

ITEM NAMES eee 

STOCK NUMBER: QUANTITY: 





UNIT PRICE: 





$ , _.__ DATE REQUIRED: _/__ 





4.3. OVERLAY FORMATS 


Recall from 3.3.4 that an overlay format physically overlays a portion of your original 
format. When your program requests the display of an overlay, the overlay acts as an 
addition or extension to your original format. You can use it to input information to or 
output information from your program. Overlays can cover the entire workstation screen 
or just a portion of it. 


4.3.1. The Need for an Overlay Format 


The use and subsequent advantage of an overlay format are best illustrated with an 
example. Suppose that your program uses an original format that is displayed as: 











SALES ORDER 





CUSTOMER NAME: 
ADDRESS: 

of (eae STATE: —§ - ZIP: _ 
ITEM: 







COST: $, 
QUANTITY: ___ 
SALESMAN: 
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All the fields are input fields a salesman at a workstation fills in. Every time the 
salesman transmits a screen, your program checks the inventory levels to make sure 
there’s enough of the ordered item in stock. If there is, the screen format is replenished 
with underlines and the salesman can enter the next order. If a stock item is unavailable, 
your program displays an overlay format. This overlay offers the salesman alternatives 
to the item originally requested. 


For example, a salesman enters the following order: 














SALES ORDER DATE: 
CUSTOMER NAME: ERT DEDECERESCREr TS 
ADDRESS: 
CITY: QUMIETINNE) = «= STATE: ZIP: (a 
ITEM: (ERRRRESES _ 
STOCK NUMBER: 
COST:$_, Sa 
QUANTITY: [_ 


SALESMAN: AEST) == 





When your program checks the inventory level of R-Widgets, it finds only five in stock. 
The quantity requested is 10. Under the circumstances, your program overlays the 
lower half of the screen format with an overlay format. The overlay offers the salesman 
a choice of other similar stock items or the option of back ordering the items that are 
not available. The display the salesman sees is: 







SALES ORDER DATE: 15/05/82 

CUSTOMER NAME: John Doe Associates_ 
ADDRESS: 123 Main Street_____ 
CITY: Philadelphia___ STATE: PA ZIP: 19108 
ITEM: R-Widgets__ 
> ITEM IS NOT AVAILABLE 
YOUR ALTERNATIVES ARE: 

1. A-WIDGETS 2. C-WIDGETS 

3. E-WIDGETS 4. BACKORDER ITEM REQUESTED 
ENTER ALTERNATE SELECTION NUMBER_ 









= O COON O Ul & W PA a 


Lines 6 through 10 constitute the overlay format. On the overlay, the salesman makes 
his choice and transmits the screen. Your program then writes the original format and it 
is ready for the next order. 
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& lt is important to note that only one format can be active on a workstation screen at a 
time. What this means is that when the overlay is displayed in the example above, a 


salesman can enter information only on lines 6 through 10. He can’t go back and make 
a correction to any of the information from the original format. 


Now consider another example in which two overlay formats are used. 


= @8 An input format is displayed at the workstation. 





The workstation operator enters information and transmits. 


NAME : Sih iS baa 


EMPLOYEE NO. : beaMiag 





An overlay format with corresponding employee information is selected by the 
program. 







NAME: JOHN SMITH 
EMPLOYEE NO.:54123 

DEPT #:103 DEPT. NAME:BILLING 

DATE OF HIRE: 72/06/10 

DO YOU WISH SALARY INFO (YES, NO):___ 










The operator answers YES to the question on the last line and transmits. A second 
overlay format displays the requested information. 


NAME: JOHN SMITH 
EMPLOYEE NO.:54123 
CURRENT SALARY :$200006 


PREVIOUS INCREASE: 8% DATE: 7990601 
GRADE:D 


MIN: $15006 MID:$19000 MAX:$23000 
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Use of an overlay can be initiated or terminated, depending on the application of your 
program. The important thing to remember is that an overlay format, although it can 
look the same as the original, is a completely separate format. It must be created 
separately and as a result has its own format name as well as field ID's. Logically 
speaking, an overlay format would be created after an original format so that its 
eventual positioning on the workstation screen, as it relates to the original format, can 
be determined. | 


4.3.2. Creation of an Overlay Format 


An overlay format is created in much the same way as an original format. The steps for 
creation are: 


1. Activate the SFG via LOGON and RV SFGEN. 


2. Complete home screen. On the characteristics screen, use answer 2 (OVERLAY) on 
line 8 for SCREEN FORMAT IS. 


3. Complete any requested optional screens. 
4. Complete template, type attribute, and !/O screens. 
5. Complete any requested dialogs. 


The only difference between the creation of an overlay and an original format occurs in 
pass 1 — the template screen. If you want the overlay to replace, at some point, lines 6 
to 10 of an original format, you must begin the overlay on line 6 of the template 
screen. You must also place the start-of-entry character (SOE Pp) in the first position of 
that line. It indicates that the format is an overlay whose point of entry on an original 
format will be on line 6. The position of the cursor at transmission marks the end of the 
overlay format. 


For example, to create an overlay for lines 6 through 10 of the following sample original 
format: 















: SALES ORDER 
CUSTOMER NAME: oo 
ADDRESS: 
CITY: STATE: ZIP: 


ITEM: 






COST: $_, __ 
QUANTITY: ___ 
SALESMAN: 


WOMAN OO US WHER = 
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You must complete pass 1 for the overlay format as follows: 


6. > ITEM IS NOT AVATLABLE 

ran YOUR ALTERNATIVES ARE: 

8. 1. A-WIDGETS 2. C-WIDGETS 

9: 53. E-WIDGETS 4. BACKORDER ITEM REQUESTED 
10. ENTER ALTERNATE SELECTION NUMBER _ 





The start-of-entry character marks the beginning of the overlay, and the cursor marks its 
end with respect to the original format. When the template screen is transmitted, the 
type attribute screen is displayed for this 2-line format. Since it is a completely 
independent format, the type attributes that you specify may be different from those 
specified for the original. The same is true of I/O directions. You may also initiate 
dialogs for one or both of these fields. | 


All overlay screens must begin with the start-of-entry character (SOE), even those 
beginning in position (1,1). During format generation passes 2 and 3, the first line is 
shifted to the left one character, and the SOE character disappears. The screen is 
generated as specified in pass 1 with the SOE character, and no attempt should be 
made to shift back the correct line. 


The flexibility you are afforded when creating a new or using an existing overlay format 
parallels that of an original. The use of one or more overlay formats for inputting and 
outputting can be initiated by your program. An overlay format is incorrect only if it 
does not physically and logically fit in with the original format to accurately reflect the 
requirements of the program. You should be aware that when modifying an overlay 
format using Modify Screen — Option 7 (CHANGE TEMPLATE ONLY — NO INTERNAL 
CHANGES), column 80 of the first line of the overlay format must be blank; otherwise, 
the format will be generated incorrectly. (See 5.1.1.4.) 


4.4. CREATING A FORMAT WITH DUPLICATE LINES 


When creating a screen format, you may specify that certain fines be duplicated without 
actually entering a line twice on the template screen. 


The variable data fields on any duplicate line are totally independent from the fields on 
the original line. Consequently, the characteristics for these fields, such as type 
attributes and |/O directions, may differ. 
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To specify duplicate lines during creation, you enter the number of the line to be 
duplicated in the first position (or first and second positions for a 2-digit number) of the 
line where the duplicate is to appear. You could, for example, lay out the template 
screen in pass 1 as: 


PERSONAL CREDIT REPORT 


Own & WRN a 





You can type in 02 or 2 at line 4 and O3 or 3 at line 5. Either way, the system 
recognizes that lines 4 and 5 are duplicates of lines 2 and 3. Upon transmission, the 
type attribute screen is displayed as: 


tz PERSONAL CREDIT REPORT __/__/82 
2. NAME Soot oo 

3. RODDRS nn on oe ee STATE: _.. -_ ZIP: __ 

4. NAMES 

5. DOR cao og este STATE: _._-_- ZIP: 

6. 


Since duplicate lines are independent from the originals, the type attributes selected for 
the fields on these lines may be the same or different from the characters selected for 
the originals. You could, for example, complete pass 2 like this: 


PERSONAL CREDIT REPORT 99/99/82 


STATE: A__ ZIP: 9__ 


STATE: A__ ZIP: 9 


Aw FWP 





Although the first field on line 3 is specified as alphanumeric, its duplicate on line 5 is 
alphabetic. 
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This same concept can be applied when completing pass 3. I/O directions for the 
duplicate fields can be the same as or different from those specified for the originals. It 
follows that you can initiate dialogs for a duplicate field but not its original and vice 
versa, Of you can initiate dialogs for both. You might complete pass 3 in this way: 


PERSONAL CREDIT REPORT 0 /0_/82 


STATE: B__ ZIP: ! 


STATE: B__ ZIP: ! 


Own & WN 





The rules for specifying duplicate lines are: 
1. A duplicate line number must not be entered on the first line of a format. 


2. A duplicate line number entered in the first position of any line must be less than 
the number of the line on which it is entered. 


3. A duplicate line number specified in the first position (first and second positions for 
a 2-digit line number) must be followed by blanks for the rest of the line. 


4. A blank line may not be repeated. 
lf you violate any of these rules, the number is treated as part of the format (a display 
constant) when the template screen is transmitted. No blinking occurs as in other error 


conditions. 


Assume that you lay out the template screen in pass 1 as: 


PERSONAL CREDIT REPORT 


2 PAST DUE AMOUNT: 
10 
@' 


OON AOU EWP = 





Analyzing this screen, we see: 
m Lines 4 and 5 


Indicate that lines 2 and 3 are duplicated. 
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w Line 6 


Indicates that line 2 is not duplicated because blanks don't follow the number. The 
SFG recognizes this line as a display constant. 


a § Line 7 


Incorrectly specified because the number 10 is greater than the number of the line 
on which it appears. The number 10 is considered a display constant. 


» Line 8 


Incorrectly specified because the first position contains a space. The number 3 is a 
display constant. 


lf these errors are not corrected before you transmit this screen, the type attribute 
screen is displayed as: 


PERSONAL CREDIT REPORT 


NAME: 

ADDR: 

NAME : 

ADDR: 

2 PAST DUE AMOUNT: 
10 

3 


OAN OW FSF WN 





To make corrections, you can do one of two things: 
1. Return to the home screen (function key F1) and start the format over again. 


2. Complete passes 2 and 3 and any dialog screens. When the home screen is 
displayed, select the MODIFY function (Section 5) to correct the format. 
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5. Modifying Formats 


CREATE-FROM AND MODIFY FUNCTIONS 


The CREATE-FROM and MODIFY functions are essentially the same. CREATE-FROM 
allows you to create a new format by changing an existing format. The old format is 
not altered and is saved along with the new format in $Y$FMT or a user-assigned 
library file for future use. 


MODIFY also allows you to create a new format by changing an existing one; however, 
the old format is not saved. After modification, it becomes the new format. 


Among the changes you can make via the CREATE-FROM and MODIFY functions are: 


Change any format level specification from the characteristics screen. 

Change features that were defined through optional screens. 

Change the format’s layout: Add fields, delete fields, and change field lengths. 
Change field type attributes. 

Change field |/O directions. 

Change field characteristics that were defined through dialogs. 

Replace lines. 

Add or insert new lines. 

Delete lines. 


Change only the format’s layout (without adding or deleting fields or changing their 
length). 
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If you understand all of the steps involved in the CREATE function, the functions & 
discussed here should present little or no difficulty. To initiate either one, you must 
perform the following operations: 


1. Activate the SFG using LOGON and RV SFGEN. This results in a display of the 
home screen: 








1. Function (1) 1 CREATE 2 CREATE-FROM 3 MODIFY 4 DELETE 

2. 5 SHOW 6 LIST 7 SPOOL 8 TERMINATE 
3. 

4, Old format: Format name: (| ) 

Se is in library: File name: (SYSFMT ) 
6. Volume: CRES ) 

7. 

8. 

9. New format: Format name: (> ) 

10. stored in library: File name: (SYSFMT ) 
11. Volume: (RES ) 

12 File does not exist: Allocate: (@@2) cylinders 

13. Increment: (91) cylinders 

14, 

15: 

16. 

17. 

18. *Function keys are: F1 -—- GO TO HOME SCREEN F5 —- BREAKPOINT SPOOL FILE 
19. F13 - HELP F14 - EXIT HELP 
20. F2@ -— RESTORE SCREEN 
21. 
22. 
23. 
24. 


2. Select the appropriate function code and overwrite the default on line 1. 


3. Provide the old and new format names for CREATE-FROM and old name for 
MODIFY. 


You can then make the appropriate changes to the old format. 


NOTE: 


When performing a modify or CREATE-FROM operation on a packed, binary, or zoned 
field for which range values have been defined, the range values displayed on the range 
values screen (dialog screen 8) will be incorrect. This does not affect input processing; 
therefore, type in the desired range values and transmit. 


5.1.1. Modify Screen 





Specific changes to an old format are initiated through the modify screen, which is 
displayed as in Figure 5—1. 
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Modify option (1): 1 CHANGE TEMPLATE 2 CHANGE TYPE 3 CHANGE 1/0 


? CHANGE TEMPLATE ONLY - NO INTERNAL CHANGES 


Oo VW BEB W A oo 





Figure 5-1. Modify Screen 


The modify screen (Figure 5—1) lists four options that can be used to change an existing 
format. You specify your selection by overwriting the default value on line 2 with any of 
the other acceptable values. Completing and transmitting the modify screen produces 
results characteristic of the option that you select. 


5.1.1.1. Modify Screen — Option 1 (CHANGE TEMPLATE) 


The sequence of steps for this option is quite similar to those for the CREATE function. 
After you transmit the modify screen, the characteristics screen automatically appears 
for you to make changes to your format. The values that appear on the characteristics 
screen are the ones you specified when you created the format. You can overwrite any 
of the values on the screen with new values. If you originally selected options that 
prompt optional screens or if you initiate new optional screens, these too will appear 
automatically after you transmit the characteristics screen. You can change any of the 
values that appear on the optional screens. 


After you transmit the last optional screen (or after you transmit the characteristics 
screen if no optional screens were requested), the after image of the template screen 
for the old format is displayed without protection. You can rearrange the format or 
change any portion of the format layout, including display constants or the length of any 
field. You may also delete and add fields. 


When the template screen is transmitted, the type attribute screen is displayed for you 
to define type attributes for every field in the format — changed as well as unchanged 
ones. In other words, you must complete this screen as if the format were being 
created for the first time whether the type attribute characters are to be the same as 
when the format was originally created or not. 


When the type attribute screen is transmitted, the I/O screen is displayed for you to 
complete in the same manner by specifying I/O directions for all the fields in the format, 
as well as initiating dialogs for any fields that require them. If one or more dialog 
screens were used during creation to provide certain characteristics (such as range 
checking and replenishing values) for a field, you must initiate dialogs again for that field 
if you want these characteristics to be retained. 
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When all three passes and any dialog screens are completed, control returns to the 
home screen for you to select another function. 


5.1.1.2. Modify Screen — Option 2 (CHANGE TYPE) 


When you select option 2, you're first presented with the characteristics screen, where 
you can specify any format-level changes you wish to make. If any optional screens 
were requested (either when the format was created or as a result of changes to the 
characteristics screen), they appear after you transmit the characteristics screen. Once 
you ve transmitted the optional screens (or the characteristics screen if no optional 
screens were requested), the after image of the type attribute screen for the old format 
Is displayed. 


On this display, you may only change type attribute and edit characters for any field. 
You may not change any display constants or delete, add, or change the length of any 
field. You may not rearrange the format in any way. 


When this screen is transmitted, the |/O screen is displayed for you to define the I/O 
directions for every field in the format and to initiate dialogs as necessary. When all 
dialogs are completed, control returns to the home screen. 


5.1.1.3. Modify Screen — Option 3 (CHANGE I/O) 


If you select this option, the characteristics screen appears first, just as it does for 
options 1 and 2. After you transmit the characteristics screen and, if requested, any 
optional screens, the after image of the |/O screen for the old format is displayed. You 
may only change the |/O directions and initiate dialogs for the fields as necessary. 


5.1.1.4. Modify Screen — Option 7 (CHANGE TEMPLATE ONLY — NO 
INTERNAL CHANGES) 


lf you select this option, the characteristics screen is the first to appear. Unlike options 
1 through 3, however, there are certain changes you cannot make. This option only lets 
you alter the appearance of a format. It doesn't let you make any changes that would 
affect the program interface. When modifying an overlay format using this option, 
column 80 of the first line of the overlay format must be blank; otherwise, the format 
will be generated incorrectly. The changes you can make to the characteristics screen 
and any optional screens that appear as a result are: 


m Error retry count 

= Alphabet 

@ Edit screen: any character 

= Special display screen: any parameter 


= Error message screen: number of lines in error message and any parameter except 
the indicator 
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You may change the format’s layout by doing one or both of the following: 


m Change one, all, or none of the display constants and/or their location on the 
template screen. 


m™ Change the location of fields on the template screen. 


In either case, you may not change the order of the fields, nor may you add, delete, or 
change the length of any field. The following is the template screen for an old format. 


PERSONAL CREDIT REPORT 
NAME: 


ee DD el 


ADDR: 


ACCOUNT NUMBER: 


PAST DUE AMOUNT: 


NEW BALANCE: DUE DATE: /__/ 


_ Modifications might result in: 


PERSONAL CREDIT REPORT 





Notice that two display constants have been changed: ADDR to ADDRESS and 
MINIMUM PAYMENT to MIN PAYMENT. The corresponding field lengths have not been 
altered, nor have any other field lengths. Fields have not been added or deleted, and the 
order of the fields is unchanged: PAST DUE AMOUNT still follows ACCOUNT NUMBER, 
NEW BALANCE still follows PAST DUE AMOUNT, and so on. Each field retains the 
same type attributes, I/O directions, and dialog-provided characteristics that were 
specified when the format was originally created. In other words, there are no internal 
field changes. 


lf you inadvertently change the length of a field, the following error message is 
displayed: 


SFG3@ INTERNAL FIELD HAS BEEN CHANGED. 
UPDATE NOT COMPLETED. 
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After this message appears, the home screen will be displayed. Upon completion of the 
home and modify screens, correct the field length on the resulting template screen. 
Upon transmission of the template screen, whether you've rearranged it or not, 
modification is complete and the home screen is displayed for you to select another 
function. 


5.2. MODIFICATION SUMMARY 


The CREATE-FROM and MODIFY functions allow you to create a new format by 
changing an existing one. The method you use depends on the changes that you want 
to make and which of the previously described options affords the simplest means for 
making them. The following diagram provides a general summary of these options. 


HOME SCREEN 
MODIFY SCREEN 
CHARACTERISTICS SCREEN 
OPTION 1: CHANGE TEMPLATE 
PASS 1» PASS 2—»PASS 3—+DIALOG SCREENS—> HOME SCREEN 
OPTION 2: CHANGE TYPE @ 
PASS 2—*PASS 3—DIALOG SCREENS—*HOME SCREEN 
OPTION 3: CHANGE I/O 
PASS 3—» DIALOG SCREENS —~HOME SCREEN 
OPTION 7: CHANGE TEMPLATE ONLY — NO INTERNAL CHANGES 


PASS 1—* HOME SCREEN 


Keep in mind that you can terminate the CREATE-FROM or MODIFY functions 
(regardless of the option you're using to accomplish the changes) by using the F1 
function key at any point before completion of the actual changes. You may also initiate 
the HELP function at any point during the CREATE-FROM or MODIFY function. 


NOTES: 


1. If you press XMIT before moving the cursor in pass 1 of the CREATE-FROM 
function, modify option 7, or modify option 7, the help screen for pass 1 will be 
displayed. If this happens, simply make the desired entries and press XMIT. 
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© 2. Certain screen formats containing range check values, nondefault replenish strings, 
and conditional indicators may not be usable with the MODIFY/CREATE-FROM 
functions when beginning with modify option 2 (CHANGE TYPE) or modify option 3 
(CHANGE I/O). If the Screen Format Generator detects a format that cannot be 
modified, this system message is displayed: 


UNABLE TO MODIFY THIS FORMAT-PLEASE USE CREATE FUNCTION 


lf this message appears, use modify option 1 (CHANGE TEMPLATE) to modify the 
existing screen format. 
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6. Additional Functions 


6.1. DISPLAY FUNCTIONS 


Each of the three display functions — SHOW, LIST, and SPOOL — gives you a display of 
information about an existing format. 


When you want to change a format via the MODIFY function, for example, a display of 
the old format is useful in determining what changes you want to make. Depending on 
which display function you choose, you can obtain a general format display at the 
workstation, a listing of the detailed field characteristics at the workstation, or a printed 
listing of both. 


The DELETE function deletes a chosen format from the library (SY$FMT or a 
user-assigned library, see Appendix A) and the TERMINATE function ends the SFG 
session. 


6.1.1. SHOW Function 


You initiate this function by entering function code 5 on line 1 of the home screen and 
by entering the old format name on line 4. When the home screen is transmitted, you 
get a workstation display of the existing format with its field type attributes. Input-only 
fields will contain their replenish values to distinguish them from bidirectional fields. 


You may use the TAB key to help you identify the protected fields from unprotected 
fields. The cursor automatically stops at the beginning of each unprotected field each 
time the TAB key is pressed. The low-intensity display of paorected fields also helps 
you to make the distinction. 


6.1.2. LIST Function 
This function is initiated by entering function code 6 on line 1 of the home screen. Its 


purpose is to provide comprehensive information about a format as a whole and about 
the individual fields in a format. The information the LIST function provides includes: 


= A summary of format-oriented information from the characteristics screen 
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= Details from any optional screens originally requested for the format 
m= § The type attributes and characteristics of all fields 

s Details from any dialog screens originally requested for any field 

= Details about the input and output data structures showing the data 
= Interface to the user program 


The LIST function provides all this information by displaying a series of screens at your 
workstation. 


When you transmit the home screen, a summary screen is displayed for you. This 
screen contains a synopsis of what was specified on the characteristics screen when 
the format was created. When you transmit the summary screen, the next screen (or 
series of screens) displayed depends on how the format was created. 


If the format incorporated any of these options: 

= Special editing characters 

@ Special display control 

w An error message field © 
= 8 Function/command keys 

Then the next series of screens will include one or more of these displays: 

= #£«A special editing display 

= + #A display control and error message display (This is one screen.) 

= §€A function/command key display 

Following transmission of these screens, you get a display of the format as it was 
created. If none of the above options were selected for the format, then this display of 
the format follows immediately after you transmit the summary screen. 

After you transmit the display of the format, the next screen to appear is the list 
screen. This screen displays detailed characteristics of the fields in the format, such as 
field ID, 1/O directions, and external lengths. At this time, you may also request sublist 
screens and conditional values screens. Sublist screens provide any field response 
requirements, default values, range check values, and replenishing values that were 


specified for any fields via dialogs. Conditional values screens display any conditional 
features and conditional indicators that were specified for fields, also through dialogs. 
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Finally, input record screens display the internal location of input fields, and output 
record screens display the internal location of output fields. 


NOTES: 


1. When you use the LIST function, it is displayed in two parts if your format consists 
of more than 12 lines. 


2. If your format is using line 12 or 24, any characters in columns 79 and 80 are not 
displayed due to cursor positioning. 


3. The preceding notes do not apply to either the SHOW or SPOOL functions nor do 
they affect the detailed output of the LIST function. 


6.1.2.1. Summary Screen 


Figure 6—1 shows a typical display of the first screen presented for the LIST function 
for an old format. 


NAME: FORMAT®@1 FORMAT SIZE: 98 X 64 DATE: 82/10/29 CREATED FROM: 


1. 

2% ALPHA:ENGLISH FILE: SYSFMT ON RES GEN9 
3. LINE ORIGIN: 91,01 OVERLAY: NO ERASE/UNLOCK BY: CONDITIONAL INDICATOR 

4. LOWER CASE TRANSLATION: YES NUMBER OF VARIABLES: 0014 ERROR RETRY COUNT: 02 
5. TRANSMIT ALL, REGARDLESS OF CURSOR POSITION: NO 

6. SPECIAL EDITING CHARACTERS: YES SPECIAL DISPLAY CONTROL: YES 

7. ERROR MSG. FIELD SPECIFIED: YES DISPLAY RETENTION: NO 

8. FUNCTION/COMMAND KEYS DEFINED: YES 

9. FORMAT HAS A NON-DISPLAY CONSTANT: NO 
10. 
11. INPUT ONLY FIELDS TO BE REPLENISHED AFTER INPUT - INDICATOR IS Y 006 
12. 





Figure 6—1. Summary Screen 


Analyzing this screen, we see: 

m Line 1 
Displays the format‘'s name (FORMATO1), its size (8 lines, the longest of which is 
64 characters), its creation date (82/10/29), and the name of the format from 
which this format was created (if one exists). 


NOTE: 


The system edits the date as year/month/day. 
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a Line 2 
Displays the language or character set (ENGLISH) that was used, the name of the 
screen format file (SY$SFMT), the volume (RES) containing that file, and your release 
level (GENQ, indicating release 9.0). 

a Line 3 
Displays the row and column number where the format begins on the screen, 
whether the format is an overlay format (NO), and how the format is erased and 
the keyboard unlocked (by CONDITIONAL INDICATOR). 


a Line 4 


Displays whether lowercase translation was specified (YES), the number of variable 
fields in the format (14), and the error retry count (O02). 


= Line 5 
Displays whether input was specified to be returned to the user program. When 
YES is specified, all input will be returned to the user program displayed on the 


screen, regardless of where the cursor is positioned. 


m Line 6 





Displays whether special editing characters were specified (YES) and whether 
special display control was requested (YES). When special editing is YES, it 
prompts the appearance of the special editing display. When display control is YES, 
it prompts the appearance of the display control/error message display. These 
screens appear after you transmit the summary screen. 


ws Line 7 
Displays whether an error message field was specified (YES) and whether display 
retention was specified (NO). When YES is specified for the error message field, it 
prompts the appearance of the display control and error message display. 


= # Line 8 


Displays whether function/command keys were specified (YES). When YES is 
specified, it prompts the appearance of the function/command key display. 


mw Line 9 


Displays whether the format has a nondisplay constant (NO). When YES, the length 
of the constant is also displayed on line 8, and the value of the constant is 
displayed on line 9. 
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=” Line 11 


Displays the conditional indicator that controls whether input fields are replenished 
after input (as it was specified on the conditional erase/replenish screen). 


6.1.2.2. Special Editing Display 


This display is a copy of the original edit screen (3.4.3). It lists the user-defined 
characters, as well as the standard characters, and is shown in Figure 6—2. 



























1. NAME: FORMATO1 FORMAT SIZE: 8 X 64 DATE: 80/10/13 
2. SPECIAL EDITING CHARACTERS: YES 

3. 

4. STANDARD CHAR : MEANING CHAR TO BE USED 
5. 

6. CURRENCY SYMBOL ($) 

7: . 1 DECIMAL POINT = (/) 

8. , 1 THOUSANDS PUNCT. = (,) 

9. : REPLACEMENT CHAR. = (*) 

10. CR: CREDIT ON NEGATIVE = (CCR) 

11. DB: DEBIT ON NEGATIVE = (DB) 

12. : REPLENISH CHAR. = () 


Figure 6-2. Special Editing Display 


6.1.2.3. Display Control and Error Message Display 


This display summarizes what was originally specified on two optional screens: the 
special display control screen and the error message screen. It lists the display 
properties for display constants, output variables, input capable variables, and fields 
entered in error. It also lists the name of the error message field (if one was specified), 
along with the number of lines in the message and the line number where the message 
appears. A typical display control and error message display is shown in Figure 6-3. 








eee 
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NAME: FORMAT@1 FORMAT SIZE : 08 X 64 DATE: 82/10/15 
DISPLAY CONSTANTS: > (A) ¢ ) OUTPUT VARIABLES 2 (A) (1 2 3 4 5) 
INPUT CAPABLE VARIABLES: (A) ¢ ) FIELDS ENTERED IN ERROR: (B) (5 ) 
ERROR MESSAGE TO BE DISPLAYED ON LINE NUMBER: LAST NUMBER OF LINES: 1 
ERROR MSG. FIELD NAME IS: ERRORMSG ERR.MSG DISPLAY ATTRIBUTES: (B) (5 ) 








ERROR MESSAGE TO BE CONDITIONALLY DISPLAYED BASED ON INDICATOR (CY 001) 


INTENSITY: EMPHASIS: 





A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
B. ALTERNATE (LOW) INTENSITY 2. COLUMN SEPARATORS 5. BLINK FIELD 
3. STRIKE THRU BARS 












Figure 6-3. Display Control and Error Message Display 


6.1.2.4. Function/Command Key Display 


This display is a copy of the function/command key screen. It shows key numbers and, 
if defined, the corresponding response for all possible function/command keys. 


Figure 6—4 shows a sample display of the function/command key display. 


CON OU SE WN = 


©) 









NAME: FORMATO1 FORMAT SIZE: 08 X 64 DATE: 80/10/13 
FUNCTION COMMAND KEYS DEFINED: YES 


























KEY# ACCEPT? RESPONSE KEY# ACCEPT? RESPONSE KEY# ACCEPT? RESPONSE 
F 1 (N) (000) F2 CY) (001) F3 (Y) (965) 
F4 CY) (005) F5 CY) (000) F6 (N) (000) 
F7 (N) (900) F8 (N) (900) F9 (N) (000) 
F10 (N) (900) F11 (N) (000) F12 (N) (900) 
F13 CN) (000) F14 (CN) (600) F15 CN) (000) 
F16 (N) (600) F17 (N) (900) F18 CY) (025) 
F19 (N) (000) F20 CY) (174) F21 CN) (000) 






F22 





CN) (900) 





Figure 6-4. Function/Command Key Display 
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6.1.2.5. The Format Display 


This display looks like the after image of pass 2, when the screen was created. It 
shows the type attributes for every field in the format. Figure 6-5 shows a typical 
format display. 











PERSONAL CREDIT REPORT 99/99/82 
NAME : AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 

ADDR = XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX STATEZAAA ZIP:99999 
SOCIAL SECURITY:99919919999 

ACCOUNT NUMBER: XXX -999999 

AMOUNT DUE:$99.999.99 

BALANCE:$$,$99.99 PAYMENT DUE DATE:99/99/99 










NA WB WA wo 









Figure 6-5. Screen Format 





6.1.2.6. List Screen 


& Figure 6—6 shows the next screen to be presented for the LIST function. 


















ae NAME: FORMATO1 FORMAT SIZE: 08 X 64 DATE: 80/10/13 

2: FIELD-ID CY,X) 1/0 EXTERNAL INTERNAL RESPN REPLN RANGE COND 
3. TYP LNGH TYP BYT DIGIT 

4. FLDG0001 1,292 B N 2 D 2 rae M - ( ) C ) 
as FLDOOO02 1,58 B N 2 D 2 2. ( ) ( ) 

6. NAME 2,07 I A 30 D 30 30. R - ( ) 
?. ADDR 5,07 B X 36 D 30 39. R - 

8. STATE 3,46 B A 4 D 4 4. R - 

9. FLDO9006 5,56 B N 5 P 3 5. 0 - ( ) 
10. MORE? Y or N ( ) 
11. 


Figure 6-6. List Screen 


Line 1 of the list screen (Figure 6—6) shows the format’s name (FORMATO1), its size (8 
lines, the longest of which is 64 characters), and its creation date (80/10/13). The 
system edits the date as year/month/day. Line 2 displays the headings for the particular 
field characteristics listed in each column. The following is a list of the headings and 
corresponding column contents. 
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we FIELD — ID 





This column contains the names of the particular format fields. These are listed in 
the order defined during creation. In this example, SFG-provided names, as well as 
user-assigned names, are listed. 


mw (Y, X) 


This column displays the Y, X coordinates (or the physical position) of each field. 
The Y coordinate is the line on which the field is located, and the X coordinate 
indicates the position of that field on the line. The field whose ID is FLDOOOQ1, for 
example, is located on line 1 and starts at the 55th character position on that line. 


es (1/0 


This column displays the |/O usage for the fields in a format, where | is for input, O 
is for output, and B is for both (input and/or output). Refer to 4.1.3 for a detailed 
discussion of |/O directions. 


m@ EXTERNAL 


This column indicates the external display type and the external display length for 
the format fields. The N 2 in this column means that field FLDOOOO1 is a numeric 
field with an external length of 2 (underlines). The abbreviations for the external ©} 
field types are: 





Abbreviation Meaning 

N Fixed numeric field 

A Alphabetic field 

xX Alphanumeric field 

NE Numeric edited field 

AE Alphabetic edited field 

XE Alphanumeric edited field 
m INTERNAL 


This column shows the internal usage of the field and the internal length. The D 2 
for the first field means that its internal usage is display and its internal length is 
two bytes. The P 3 for the last field means that its internal usage is packed and its 
internal length is three bytes. Refer to 3.5.2 for a discussion of internal length and 
usage. The abbreviations for the internal usage types are: 
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Abbreviation Meaning 

D Display 

B Binary 

P Packed decimal 

Z Zoned decimal 
m= RESPN 


This column lists the field response requirements for input or bidirectional fields, 
where: 


M Means MUST FILL — the field must be completely filled in. 
OQ Means OPTIONAL — any or no characters may be entered. 
R Means REQUIRED — at least one character must be entered. 
() Means DEFAULT — a value has been specified. 
Refer to 3.5.2 for an explanation of field response values. 
= REPLN 
This column indicates replenishing values for input or bidirectional fields. A single 
character in the column shows the replenish value for the screen (either an 
underline or the character selected on the EDIT screen). A set of parentheses 


indicates that a unique replenish value has been specified for this field. Refer to 
3.5.2 for an explanation of replenishing. 


m RANGE 
This column indicates whether range checking has been requested for a field. The 


presence of a set of parentheses indicates that range checking has been requested. 
Refer to 3.5.8 for an explanation of range checking. 


= COND 
This column indicates whether any conditional indicators were specified to control 
certain features of the field. A set of parentheses in this column signifies that 
indicators are used. 


At the bottom of the screen, this continuation message ts displayed: 


MORE ? YorN € ) 








UP-9977 SPERRY OS/3 6-10 
SCREEN FORMAT SERVICES 


Key in Y to continue to the next list screen. The default value is N, so you can 
terminate the LIST by pressing the XMIT key. 


NOTE: 
The SFG terminates the list if you key in any character other than Y. 


Through the information presented on this list screen alone, you can tell a great deal 
about the format without even having created it. 


6.1.2.7. Sublist Screen 


The sublist screen, if initiated, displays the values that were specified (during creation 
via dialogs) for field response, range checking, and replenishing. Recall that a set of 
parentheses in the RESPN, REPLN, or RANGE column of the list screen indicates that 
specific values, other than SFG default values, have been assigned for that field. To find 
out what these values are, you simply enter a Y in any of these parentheses, depending 
on which, if any, of these values you want to know. Upon transmission of the list 
screen (either the last in an entire series of list screens or the one in which you answer 
N to the question MORE?), the sublist screens are presented. 


Let's say that you make the shaded entries on the list screen: 


1. NAME: FORMATO1 FORMAT SIZE: @8 X 64 DATE: 80/10/13 

2. FIELD-ID (X,Y) I/0 EXTERNAL INTERNAL RESPN REPLN RANGE’ COND 
3. TYP LNGH TYP BYT DIGIT 

4. FLDOO001 N 2 D 2 2. M - ¢ ) 

5% FLDO0002 2 2 2. (> () (p> 

6. NAME 30 30 30. R - 

7. ADDR 30 30 «630. R - 

8. STATE 4 4 4, R - 

9. FLDO9006 ; 5 3.COSSY 0 - 

10. | MORE ? Yor N 
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@ Upon transmission of the list screen, the sublist screen (Figure 6-7) is displayed for 

FLDOOOO2: 

1. FIELD-ID  (Y,X) 1/0 EXTERNAL INTERNAL RESPN  REPLN RANGE COND 

2. TYP LNGH TYP BYT DIGIT 

3: FLD00002 1,58 B N 2 D 2 2. (Y) (Y) (Y) 

4, DEFAULT VALUE: 

5. 99 

6. LOWER TO UPPERCASE TRANSLATION IN EFFECT. we 

‘. RANGE: 

8. BTW 01-04 

9. BTW 06-08 

10. GT 13 


Figure 6—7. Sublist Screen 


Analyzing this screen, we see: 


m= Lines 1 and 2 





Display the same headings as lines 2 and 3 of the list screen. 
m 8Line 3 

Is a duplicate of line 4 of the list screen. 
@ Lines 4 and 5 

Show that the default value is 99. 
m Line 6 


Shows that the YES option for lowercase translation is selected on dialog screen 2. 
For this message to appear, NO had to be selected at the screen level as well. 








UP-9977 


m= Lines 7-10 
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Show the types of range checks and the corresponding range check values that 
were selected for field FLDOOOO2 via dialog screen 7. The abbreviations for the 


range check types are: 

Abbreviation 
BTW 

NEQ 

EQU 

GT 

LT 

GE 

LE 


Refer to Section 3 for 
replenishing. 


Meaning 

Between 

Not equal 

Equal 

Greater than 

Less than 

Greater than or equal 
Less than or equal 


an explanation of field responses, range checking, and 


Upon transmission of this sublist screen, another sublist screen with the requested 
values is displayed for the next requesting field, and this continues until all fields are 
displayed. When you transmit the last sublist screen, input and output record screens 


are displayed. 


6.1.2.8. Conditional Values Screen 


This screen, if initiated, displays field features that are conditionally controlled as well as 


their control indicators. To 


display the conditional values screen, you key a Y in the set 


of parentheses in the COND column of the list scren. Refer to Section 6.1 for an 
explanation of the List Screen function. 


Figure 6—8 shows a typical conditional values screen display. 
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CON OO WL & WD = 






FIELD-ID (Y,X) I/O EXTERNAL. INTERNAL RESPN REPLN RANGE COND 
TYP LNGH TYP BYT DIGIT 
FLD@O006 3,56 B N > P 3 5 0 7 CY ) 





FIELD IS TO BE DISPLAYED IF INDICATOR 909 IS ON. 
FIELD IS TO BE RETAINED. 

FIELD IS TO BE PROTECTED IF INDICATOR 002 IS OFF. 
FIELD CHANGE NOTIFICATION VIA INDICATOR 0190. 

















FIELD DISPLAY PROPERTIES (LISTED IN ORDER OF LOWEST TO HIGHEST PRECEDENCE) 













I. DEFAULT PROPERTIES INTENSITY :NORMAL 
EMPHASIS : UNDERLINE 
IIT. OPTION IND CY 014) INTENSITY: NORMAL 
EMPHASIS :R-VIDEO 
III. OPTION IND ¢ ) INTENSITY: 
EMPHASIS : 
IV. OPTION IND ¢ ) INTENSITY: 
EMPHASIS : 
V. OPTION IND ¢ ) INTENSITY: 


EMPHASIS : 


Figure 6-8. Conditional Values Screen 


Analyzing this screen, we see: 


Lines 1 and 2 

Display the same headings as lines 2 and 3 of the list screen. 

Line 3 

ls a duplicate of line 4 of the list screen. 

Line 5 

Shows that the field (FLDOOOO6) is displayed when indicator O09 is on. (This 
indicator would have been originally specified on dialog screen 3 when the format 
was created.) 


Line 6 


Shows that the contents of the field are retained whenever indicator 005 is on. 
(This indicator would have been specified on dialog screen 5.) 


Line 7 


Shows that the field is protected when indicator OO2 is off. (Originally specified via 
dialog screen 6) 
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= #£ Line 8 


Shows that field change notification was specified for this field and the indicator 
associated with this option (as originally specified via dialog screen 7). 


= #&£Lines 10-20 


Show the display properties associated with this field when indicator 014 is on (as 
specified via dialog screen 4). | 


To display the conditional values screen for the next field you requested, simply press 
the XMIT key. Upon transmission of the last conditional value screens, you're presented 
with the input and output record screens. 


6.1.2.9. Input Record Screen 


The input record screen displays the internal displacement in bytes for a particular field 
name in the input record. You may receive an input record screen upon transmission of 
a sublist screen or list screen if no sublist screen exists. Figure 6—9 contains an input 
record screen. 









INPUT RECORD 
FIELD NAME DISPLACEMENT 


FLD90002 My 
NAME 2 
ADDRESS 32 
STATE 62 


“NO wm & WAN = 


FLD00006 66 






Figure 6-9. Input Record Screen 


Analyzing this screen, we see fields FLDOOO0O02, NAME, ADDRESS, STATE, and 
FLDOOOO6 exist in the input record and that FLDOOOOQ2 has an internal location of 0, 
NAME has an internal location of 2, ADDRESS has an internal location of 32, STATE 
has an internal location of 62, and FLDOOOO6 has an internal location of 66. 


6.1.2.10. Output Record Screen 


The output record screen displays the internal displacement in bytes for a particular field 
name in the Output record. You receive an output record screen upon transmission of 
the last input record screen. Figure 6-10 contains an output record screen. 
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hie OUTPUT RECORD 

Zi FIELD NAME DISPLACEMENT 
5. FLDO0001 1) 

4. ADDR 2 

Di STATE 32 

6. FLD@0006 36 


Figure 6—10. Output Record Screen 


Analyzing this screen, we see the fields FLDO00001, ADDR, STATE, and FLDOOOO6 exist 
in the output record and that FLDOQO001 has an internal location of 0, ADDR has an 
internal location of 2, STATE has an internal location of 32, and FLDOOOO6 has an 
internal location of 36. When the last output record screen is transmitted, control 
returns to the home screen. 


NOTE: 


A field specified as bidirectional (both input and output) appears on both the input and 
output record screens. 


6.1.3. SPOOL Function 


This function is initiated by entering the function code 7 on line 1 of the home screen 
and by supplying the old format’s name on line 4 of the home screen. The SPOOL 
function is similar to the LIST function, except your screen formats are printed rather 
than displayed and responses are not required. All information regarding your format is 
always printed. After a job terminates, all screen formats are printed. However, if you 
want to have any screen formats printed before termination, you can breakpoint the 
spool file by pressing function key 5. 


A batch job is available to spool one, some, or all of the formats in a particular library. 
Refer to Appendix G for details. 


6.2. DELETE AND TERMINATE FUNCTIONS 


The DELETE function allows you to delete a format from its library file. It is initiated by 
entering the function code 4 on line 1 and the old format’s name on line 4 of the home 
screen. Upon transmission of the home screen, the format is displayed at the 
workstation along with the following question. Note that the underlines will be replaced 
by the name of the format to be deleted. 


IS THE SCREEN FORMAT YOU WISH TO DELETE? _ CENTER “Y° OR "N”) 
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If you're sure that you want to delete the displayed format, enter Y and then press the 
XMIT key. If you decide not to, enter N and then press the XMIT key. 


NOTE: 


There is no error indication for an incorrect response. If the response to this question is 


anything other than Y (YES), then N (NO) is automatically assumed and the format is not 
deleted. 


As mentioned in 3.2.1, the TERMINATE function ends the SFG session. 
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7. Associating Formats with 
a Program: Using the Screen 
Format Coordinator (SFC) 


7.1. PROGRAMMER RESPONSIBILITIES 


Now that you know the many functional capabilities that the SFG gives you to create 
and maintain screen formats, let's see how screen formats are incorporated into a 
program. 


As mentioned in 1.2 and 1.4, the SFC has such responsibilities as retrieving the formats 
that the program is going to use, checking certain data, and controlling the flow of data 
between the program and the format. Although it isn’t necessary for you to be 
concerned with the specifics of the SFC’s activities, there are still certain responsibilities 
that you have in making the actual connection between screen formats and the 
program. Among these are making sure that the SFC knows where to retrieve the 
format, providing the proper job control statements for the format’s file, including the 
appropriate references to the formats within the program, and incorporating any 
indicators that your format relies on. 


7.2. JOB CONTROL 


To execute a program that uses screen formats, you are responsible for providing the 
proper job control statements. These statements are basically the same as they would 
be for any program that’s executed at a workstation. 


You must provide a device assignment set or DVC/LFD sequence for every file that the 
program uses, including the workstation file, and, if the format is stored on a location 
other than the $Y$FMT library (see A.1.), the format’s library file. In addition to the 
Standard job control language (JCL), you must indicate within the DVC/LFD sequence for 
the workstation that screen format services are to be provided. You do this via the 
// USE SFS statement. 


If your program interfaces with both the Menu Processor and Screen Format Services, 
you need only supply the // USE statement specifying the MENU option. Refer to menu 
services concepts and facilities, UP-9317 (current version). The SFS option for the 
// USE statement is not necessary for the dual interface, provided you perform screen 
selection within the program. 
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The format for the USE statement is: 


format-file-lfd 


[, initial-screen] heal 
1 


[,screen-format-1=alias-1,...,screen-format-12=alias-12] 


//{symbol] USE SFS oo eee 


As you can see, most of the parameters in this statement are optional, so that if your 
format is stored on $Y$FMT the following alone is sufficient to indicate the use of 
screen format services: 


// USE SFS 


With this statement included in the DVC/LFD sequence for the workstation file, your 
program can retrieve any format from $Y$FMT simply by issuing the proper calling 
statement (peculiar to the program's language) and the name of the format being called. 
The optional parameters may be used as necessary and are explained in detail in A.1. 


The job control stream to execute a program using screen formats must always include 
a DVC/LFD sequence, which contains the USE statement, for the workstation. Also, 
note that when two or more workstations access formats in the same screen format 
file, the DVC, USE, and LFD job control statements (with a unique LFD) must be 
provided for each workstation. And that, when the workstation accesses only one 
screen format file residing on RES, no DVC/LFD sequence is required for the file. 


NOTE: 


lf more than one screen format file resides on RES but not in $Y$FMT, a DVC/LFD 
sequence (with a unique LFD) must be provided for the file in order for the workstation 
to access it. 
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@ Example 1: 


// JOB MYJOB 


// DVC 50 
// VOL D@GO29 DVC/LFD sequence for the user library 
// LBL FORMAT with a unique LFD 


// LFD FMT 
// DVC 200 DVC/LFD sequence for 
// USE SFS,FMT 
the workstation 
// UID W1 


// LFD WRKSTN 


// EXEC JOBO1 


This example shows the job control statements required for a single workstation to 
access a single format on a user library. There are two DVC/LFD sequences in this 
example: one indicating the user library where the format resides (on disk volume 
DOOO29), and one indicating a workstation, where the device code number is 200 and 

© the name that the program uses to reference it is WRKSTN. Note that the DVC/LFD 
sequence for the user library provides a unique LFD for the format. That LFD is specified 
in the USE statement to indicate which format is to be used. The UID statement 
identifies the specific user Communicating with the system, in this case, the user at 
workstation 1. 


Example 2: 


// JOB PAYROL 


// OVC 200 
// USE SFS 
// UID SYSMAS 
// LFD WRKSTN 


DVC/LFD sequence for 
the workstation 


// EXEC PRSNL 


This example shows the job control statements required for a single workstation to 
access a single format that resides in the screen format library SYSFMT on RES. It 
contains a DVC/LFD sequence for the workstation, where the device code number is 
200 and the name that the program uses to reference the workstation is WRKSTN. The 
format to be used is on $Y$FMT; therefore, no DVC/LFD sequence is given for the file. 
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ee 


Example 3: , @ 


// DVC 50 

// VOL 123456 
// LBL FORMAT 
// LED FMT1 

// DVC RES 

// LBL $YSFMT 
// LED EMT2 

// DVC 200 (2) 
// USE SFS,FMT1/FMT2 
// UID W1,W2 
// LED WRKSTN 


This example indicates formats required by your program are located in two format 
libraries. When your program requests a screen format, the file labeled FORMAT is 
searched first. If the requested format is not located, the secondary format file is 
searched. 


For more information concerning the USE SFS statement and for more specific job 
control examples, see A.1. For general job control information, refer to the job control 
user guide. 
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7.3. PROGRAM CONSIDERATIONS 


In addition to issuing the proper job control statements, you must make certain 
specifications within your program to indicate that a screen format is being used. These 
specifications are relatively simple and specifically related to the language in which the 
program is written. 


You have the capability to move underlines (_) to numeric I/O fields on the screen. This 
will enable the operator to enter data directly without clearing the field of zeroes. User 
programs will not receive SF11 (USER IMPERATIVE ABNORMALLY TERMINATED) 
errors if the original data displayed contains underlines. 


7.3.1. RPG Il 


Considerations for an RPG Il program using screen formats relate to the following 
specifications forms: file, input, and output. | 


= File Specifications Form 


On this form, you must specify the workstation terminal as a primary file or a 
demand file. The block length is always omitted, and the device name (columns 
40-46) must be entered as WORKSTN. You must also specify other files used by 
the program (excluding the format library file); however, you may not designate any 
of these as secondary files if the workstation file is the primary file. 


= Input Format Specifications Form 


RPG Il initializes the workstation program by generating a blank record. This record 
must be anticipated on the input format specifications form. 


Every variable data field with an |/O direction of input or both input and output 
(bidirectional) must be identified on the input format specifications form. The field 
names need not correspond to those that were assigned to the actual format fields 
during generation. 


The field location entries on the RPG il form refer to the position of these fields 
with respect to the input data rather than to the position of the input fields on the 
screen. This is simply because data is either read from the format (from input or 
bidirectional fields) or written to the format (to output or bidirectional fields) 
automatically — according to the sequence in which the variable data fields were 
described when the format was created. 


Field lengths are counted sequentially. The FROM entry for the first input or 
bidirectional field is always 1, and the TO entry is always the number of the last. 
underline in the field as defined in the format. The FROM entry for the next field 
picks up where the TO entry for the previous field left off. The underlines are 
counted in relation to this number to get the TO entry. 
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Let's say that the first input or bidirectional field in the format has a length of 10, © 
and the second has a length of 12. The FROM and TO entries for the first field are 

1 and 10. Entries for the second field are therefore 11 and 22. Output fields are 

not counted at all. If an output field is located between two input or bidirectional 

fields, simply bypass it. 


Control levels, matching fields, and look-ahead fields may not be used with 
workstation input. 


m Output Format Specifications Form 


Every variable data field with an !/O direction of output or bidirectional must be 
identified on the output format specifications form. This includes any bidirectional 
field that was defined on the input format specifications form. 


The END POSITION entries refer to the end positions within the output data and 
not to their positions on the screen. For example, if there are two output or 
bidirectional fields with lengths of 10 and 12 respectively, the end position for the 
first field is 10, and that of the second field is 22. 


The name of the format, as it was specified on the home screen, must be entered 
in the CONSTANT OR EDIT WORD field (columns 45-52) and enclosed in 
apostrophes. The length of the format name must be entered in column 43 with 
the letter K preceding it (column 42). 





Use of a first-page indicator is not permitted. 


Figure 7-1 gives examples of screen formats and the accompanying input/output 
specifications that must be made for each format. 
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Figure 7-1. Screen Formats and Accompanying RPG Il Specifications (Part 1 of 2) 
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d. Output form 


Figure 7-1. Screen Formats and Accompanying RPG Il Specifications (Part 2 of 2) 
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© Figure 7-1 is analyzed as follows. 
m Display 1 


The screen format showing the FROM and TO positions as they relate to the length 
of every input and bidirectional field. 


= The Input Format Specifications Form 
The input specifications showing field locations (lengths) for all input and 
bidirectional fields. The corresponding field names do not match the SFG-assigned 
field names. 


= Display 2 


The screen format showing the end positions for every output and bidirectional 
field in the format. 


= The Output Format Specifications Form 


The output specifications showing the end position (length) of every output and 
bidirectional format field and the format name. Field names are not SFG-assigned. 


rd NOTES: 


1. The entries that appear on the RPG Il forms in Figure 7-1 pertain only to the format 
data fields. Likewise, the terms input, Output, and bidirectional refer only to the 
direction in which the data will flow between the program and the format. Files for 
the actual data (a master file, for example, containing names, addresses, etc) must 
be indicated by entries on the appropriate RPG Il forms. Also, I/O directions 
pertaining to data on these files may deviate from the I/O directions for the format. 
A new address, for example, may be input to the format, but at the same time it 
may serve as output to (update) a master. 


2. If during the format’s creation, editing for a numeric field involved use of the 
decimal point or a sign (+, -, etc), you must indicate the decimal places and signs 
for that field on the coding form. (See 2.3 for editing rules.) 


Refer to the RPG Il user guide for general information on RPG Il programs. 


7.3.2. COBOL 

The following subsections explain: 

= The major COBOL coding conventions for using screen format services 
®& = How to code for conditional indicators, based on these conventions 


= How to code for function keys and multiple workstation users 
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7.3.2.1. Major Coding Considerations 


The major considerations for a COBOL program using screen formats relate to the 
following divisions: 


Environment division ~ SPECIAL NAMES paragraph 
Data division - working storage section 
Procedure division - ACCEPT and DISPLAY statements 
The basic considerations for each of these divisions are: 
@ Environment Division 


The SPECIAL NAMES paragraph is used to associate screen format services with a 
workstation. The basic format for the actual statement is: 


SYSFORMAT IS mnemonic-name ASSIGN TO workstation lfd-name 


(Additional clauses associated with this format are discussed in 7.3.2.3.) 


The mnemonic-name is arbitrary, but the Ifd-name must match the name specified 
for the workstation in your job control DVC-LFD sequence as indicated by the 
following: 


OVC-LFD SEQUENCE FOR 
THE WORKSTATION 


// DVC 200 
// USE SFS 
// UID SYSMAS 
// LFD WORKSTN 


THE SPECIAL NAMES STATEMENT | 


SYSFORMAT IS mnemonic-name ASSIGN TO WORKSTN 
# #&«Data Division 


You may define an area in the working storage section that will be used to hold 
input data from the format supplied by the workstation operator and output data 
from the COBOL program to be displayed on the format. 
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© The data structures you define need not have the same names as those that were 
assigned to the fields during the format’s generation. Picture clauses associated 
with the data structures should, however, correspond to the field lengths and type 
attributes that were assigned via passes 1 and 2 of the SFG session. Assumed 
decimal places (v) and signs (s) should be specified wherever applicable. In 
addition, if the data’s internal usage is going to be packed, for example, this should 
also be indicated via the appropriate USAGE clause (USAGE COMP-3). 


= Procedure Division 
Input and output activity between the program and a screen format results from the 
issuance of DISPLAY or ACCEPT statements in the COBOL program's procedure 
division. 
- DISPLAY Statement 
Used to display data from the program as output on the screen format 


~ ACCEPT Statement 


Used to accept any input data supplied to the format by a workstation 


operator 
@ The basic formats for both statements are as follows: 
slebad jceiel ceil Ef tide as ‘aia mnemonic -name 
Literal-1 - ‘Literal -2 
ie pees | 
literal 
ACCEPT identifier-1 [, identifier-2,...]FROM mnemonic-name 
— peels | 
Literal 


(Additional clauses associated with these statements are discussed in 7.3.2.3.) 


The identifiers following the verb DISPLAY or ACCEPT are either group item names 
or elementary item names for the format’s input/output data structure as defined in 
working storage. As many identifiers as necessary may be listed after the first 
identifier. Literals, instead of identifiers, may be used with DISPLAY. 


The mnemonic name associated with UPON must be the one specified in the 
SPECIAL NAMES statement. 


If specified, the identifier or nonnumeric literal associated with the USING clause is 
a 1- to 8-character format name {as defined on the home screen). USING is 
required in only two cases. It is needed to specify the first screen format to be 
displayed at the workstation if you do not specify the initial-screen parameter in the 
// USE SFS job control statement. It is also needed to specify a format change in a 
program using more than one format. In either case, once you specify USING for a 
particular format, you can, but need not, specify it for subsequent transactions 
(ACCEPTs or DISPLAYs) with the same format. 
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The issuance of the first DISPLAY statement for a particular format results in the 
following: 


- The screen format (named on the USE SFS job control statement after the 
USING clause) is automatically displayed on the workstation screen. 


- The data indicated by the DISPLAY verb is displayed in the appropriate (output 
or bidirectional) fields of the format. 


As a general rule, a given screen format must be displayed upon before it can be 
accepted from. This is true both for the initial screen format display and every time 
there is a visible change to that format on the workstation. An exception to this 
rule occurs when a screen format has no variable output data (if, for example, the 
format is being used strictly for input). In this case, either an ACCEPT or a 
DISPLAY statement may be the first transaction with a screen format. 


With both ACCEPT and DISPLAY, it is mandatory that the number of characters 
transmitted equal or exceed the total number of characters expected by the screen 
format (the format size). In other words, there is no provision for selectively 
reading from or writing to only some of the format’s fields. You may not, for 
example, display identifier 1, identifier 2 ... and not identifiers 3, 4, and 5 if these, 
as elementary (02) items in working storage, describe three of the format’s output 
fields. 


- Displaying 
lf the total number of characters to be displayed exceeds the format size, 
excess characters will be truncated. If the number of characters to be 
displayed is smaller than the format size, a run-time error will result. 

- Accepting 
lf the number of characters to be accepted exceeds the format size, trailing 
blanks are supplied (to the program) to satisfy the request of the ACCEPT 


statement. 


lf the number of characters accepted is less than the format size, a run-time 
error results. 


Consider the screen format in Figure 7-2. 


Owe WN = 


SALES STATUS 
SALESMAN: 


COMMISSION:$__,_ 





Figure 7-2. Sample SCREENO1 
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The field characteristics as defined during creation of the format are: 


Internal Internal 
SALESMAN Display Alphabetic 

















FLD00004 





The format name, as defined on the home screen, is SCREENO1 and it resides on the 
SY$FMT library. The DVC-LFD sequence for the workstation must be included in the job 


control stream to execute a program using this format. 


// JOB SALES 


// DVC 200 
// USE SFS 
// UID wi 
// LFD WORKSTN 


// EXEC SUMMARY 


Figure 7-3 shows COBOL program entries associated with SCREENO1 as they relate to 


the environment, data, and procedure divisions. 
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A B 
8 12 


ENVIRONMENT DIVISION. 


SPECIAL NAMES 
(1) SYSFORMAT IS SCREENS ASSIGN TO WORKSTN. 


DATA DIVISION. 


WORKING-STORAGE SECTION. 


01 OUTAREA 
@2 ITEM PICTURE 9(7). 
(2){@2 QUANTITY PICTURE 9(5) USAGE COMP-3.(3) 
@2 COMMISSION PICTURE 9(5)V99. (4) 
01 INAREA 
@2 SALESMAN PICTURE 9(20). 
© ITEM PICTURE A(7). 
@2 QUANTITY PICTURE 9(5) USAGE COMP-3. 


PROCEDURE DIVISION. 


® 


DISPLAY OUTAREA UPON SCREENS USING SCREENQ@1. 


(9) DISPLAY ITEM OF OUTAREA, QUANTITY OF OUTAREA COMMISSION 
UPON SCREENS. | 


ACCEPT INAREA FROM SCREENS. 


ACCEPT SALESMAN, ITEM OF INAREA,QUANTITY OF INAREA 
FROM SCREENS. 


Figure 7-3. COBOL Program Entries for SCREENO?T (Part 1 of 2) 
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© NOTES: 


SPECIAL NAMES paragraph specifying SCREENS as the mnemonic name and WORKSTN as the lIfd-name 
assigned via JCL for the workstation. 


Data names can, but do not have to, match the names assigned to the format’s fields during creation. 
Field was specified as packed during creation (dialog screen |); therefore, USAGE is indicated. 


Editing was specified, via the type attribute screen, for this numeric field during generation of the format. 
Only the assumed decimal place should be indicated here. 


The format fields corresponding to these two items (ITEM and QOTYSOLD) were specified with an 1/O 
direction of B (for both input and output, or bidirectional}. Both items must be specified in OUTAREA as 
well as INAREA. The item names may be the same, as shown here, or different. 


DISPLAY verb may use the group item name. 


SCREENS is the mnemonic name used in the SYSFORMAT IS. statement. 


QOOC@Q © OOO © 


The USING clause specifies the first format to be used by the program. (The initial-screen parameter was not 


specified in the // USE SFS job control statement.) USING is not necessary, but can be specified, in subsequent 
DISPLAY or ACCEPT statements for the same format. 


This DISPLAY statement lists elementary item names as _ identifiers. 


© ©) 


ACCEPT statements showing both the group item and elementary item names as _ identifiers. 


Figure 7-3. COBOL Program Entries for SCREENO1 (Part 2 of 2) 


é In this example, only one format is being used with the program. As many formats as 
desired may be used, however, as long as the appropriate entries are made in the data 


division and all DISPLAY and ACCEPT statements reference the proper format name in 
the USING clause. 


You may not, in either the ACCEPT or DISPLAY statement, selectively list identifiers. 
The following would cause a run-time error since the format is expecting to receive 
output data for the field COMMISSION as well as ITEM and QUANTITY: 


DISPLAY ITEM,QUANTITY UPON SCREENS USING SCREENO1 


Since the O2 data division declarations for bidirectional fields may have the same 
INAREA as well as OUTAREA names (ITEM and QUANTITY), you are provided with an 
opportunity to specify the following or similar operations in the procedure division: 


A B 

8 12 
DISPLAY OUTAREA UPON SCREENS USING SCREEN®1. 
ACCEPT INAREA FROM SCREENS USING SCREENO1. 
MOVE CORRESPONDING INAREA TO OUTAREA. 
DISPLAY OUTAREA UPON SCREENS USING SCREEN@1. 
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Consider now the format in Figure 7-4. @ 


PERSONAL CREDIT REPORT 


PAST DUE AMOUNT:$__, __ 
PAYMENT DUE:$__, 
NEW BALANCE:$__, 
ACCOUNT STATUS: 





Figure 7-4. Sample SCREENO2 


The field characteristics as defined during creation are: 


Field I/O Internal Internal Tune 

Name Usage Usage Length YP 
NAME Input | Display Alphabetic 
ADDR Display | 30 Alphanumeric 






Fi.DOOOO3 Input — Display 


= 


The format name as defined on the home screen is SCREENO2, and it resides on the 
$SY$FMT library. The DVC-LFD sequence for the workstation is: 
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@ // JOB CREDIT 


// DVC 200 
// USE SFS 
// UID W1 
// LFD WORKSTN 


// EXEC REPORTS 


Figure 7-5 shows COBOL program entries that relate to the environment and data 
divisions. 


“AB 
8 12 
ENVIRONMENT DIVISION. 


@ SPECIAL NAMES. 
SYSFORMAT IS FORMATFL ASSIGN TO WORKSTN 


DATA DIVISION. 


WORKING-STORAGE SECTION. 


77 INACTIVE PIC X(25) VALUE "ACCOUNT INACTIVE'. 
7? OVERDUE PIC X(25) VALUE ‘ACCOUNT OVERDUE'. 


@1 OUTAREA. 


@2 ADDR PIC X(30). 

92 PAST-AMT PIC 9(5)V99. 

@2 NEW-BAL PIC 9(5)V99. 

@2 ACCNT-STATUS PIC X(25) VALUE SPACES. 
INAREA. 

@2 NAME PIC (25). 

@2 ADDR PIC X(30). 


@2 ACCNT-NUM PIC 9(9). 
@2 PAYMT-DUE PIC 9(5)V99. 





Figure 7-5. COBOL Program Entries for SCREENO2 
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In this example, the utility of being able to list several identifiers in a single ACCEPT or 
DISPLAY statement can easily be demonstrated. If, for example, you want the literal 
‘ACCOUNT INACTIVE’ to be displayed as output in the ACCOUNT STATUS field 
(FLDOOOO7 as defined by the SFG and ACCNT-STATUS as. described in 
working-storage) on the format, you simply issue the following statement in the 
procedure division: 


DISPLAY ADDR,PAST-AMT,NEW-BAL, INACTIVE UPON FORMATFL USING SCREEN@2. 


If you don't want to display anything for ACCOUNT STATUS on the format, you simply 
use: 


DISPLAY OUTAREA UPON FORMATFL USING SCREEN@2. 


You may not, however, use: 


DISPLAY ADDR,PAST-AMT,NEW-BAL UPON FORMATFL USING SCREEN@2. 


Refer to the 1974 ANSI COBOL programmer reference for more information concerning 
COBOL programming in general. 


7.3.2.2. Using Indicators 
You can specify two types of indicators when creating a screen format: 
1. Option indicators 


These affect the physical characteristics of your screen format at run time. They 
are output from your program to the screen format coordinator. 


2. Response indicators 


These are the indicators associated with function keys. They are input from the 
screen format to your program. (Function key indicators require additional coding 
that option indicators do not require. See 7.3.2.3 for details.) 


For indicators to work, you must define them in your program and send their values to 
the SFC. You do this the same way that you define and send data to output fields or 
accept data from input fields on a screen format (as discussed in the previous 
subsection). First you define indicator fields in the WORKING-STORAGE SECTION. For 
option indicators, you use the DISPLAY statement to pass indicator field data to the 
SFC. For response indicators, you use the ACCEPT statement to pass a value from the 
screen format to your program. 


When you organize the WORKING-STORAGE SECTION of your program, follow these 
guidelines: 


@ 
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= The area where you define option indicator fields must precede the area where you 
define output data fields. The indicator field area can be part of a group that 
includes the output data fields. 


= The area where you define response indicator fields must precede the area where 
you define input data fields. The response indicator area can also be a part of a 
group that includes the input data fields. 


Option indicator fields must be made a part of the DISPLAY statement along with the 
output data fields. Similarly, response indicator fields must be made a part of the 
ACCEPT statement, along with the input data fields. Where indicators are used, the SFC 


automatically expects the leading bytes from a DISPLAY or an ACCEPT operation to be 
indicators. 


The following example illustrates how to handle indicators in your program. 


Once again, consider the format shown in Figure 7-2: 


SALES STATUS 
SALESMAN: 


COMMISSION: $ _,._ _.. | 





This time, suppose the format was created with option indicators 10 and 20 and 
response indicator 30. (To keep this explanation brief and easy to follow, the functions 
performed by the indicators are not discussed.) One way of defining the indicators, 
turning them on, and identifying them to the SFC is shown in Figure 7-6. 
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ENVIRONMENT DIVISION. 


SPECIAL NAMES. 
SYSFORMAT IS SCREENS ASSIGN TO WORKSTN. 


DATA DIVISION. 


WORKING STORAGE SECTION. 


®@1 OUTAREA. 
@2 INDICATOR-REGION 
93 IND-10 PICTURE 9. 
93 IND-20 PICTURE 9. 
2 DATA-REGION 
03 ITEM PICTURE 9(7). 
3 QUANTITY PICTURE 9(5) USAGE IS COMP-3. 
93 COMMISSION PICTURE 9(5)V99. 
01 INAREA. 
@2 INDICATOR-AREA-IN. 
@3 IND-3¢6 PICTURE 9. 
®@2 DATA-REGION-IN. 
@2 SALESMAN PICTURE 9(20). 
@2 ITEM PICTURE A(7). 
@2 QUANTITY PICTURE 9(5) USAGE IS COMP-3. 


PROCEDURE DIVISION. 


MOVE 1 TO IND-10. (2) 
DISPLAY OUTAREA UPON SCREENS USING SCREENO1. (3) 


MOVE 1 TO IND-2@. 
DISPLAY IND-10,IND-20, I TEM,QUANTITY,COMMISSION UPON SCREENS USING SCREEN@1. 


ACCEPT INAREA FROM SCREENS USING SCREENO1. (5) 





Figure 7-6. COBOL Program Entries for Indicators (Part 1 of 2) 
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Here, the indicators are grouped with the output data fields. Since the format was created with indicators, the SFC 
knows that the first several bytes of OUTAREA are going to be indicator fields, not data fields. 


A simple MOVE statement is one way of turning an indicator on or off. An indicator is on when it contains the 
value of 1 and it is off when the value is 0. Although not shown in the example, you must remember to set an 
indicator value back to O to turn an indicator off. 


Here the DISPLAY verb uses the group name OUTAREA, thus passing both the indicator region and the data 
region to the SFC. Only the data fields appear on the workstation operator's screen. 


Here, instead of using the group name OUTAREA, the elementary items are listed in the DISPLAY statement. The 
result, however, is the same. The rules discussed in 7.3.2.2 regarding the DISPLAY verb also apply when 
indicators are used. 


eo © eo © © 


The field for the response indicator IND-30 is included in the ACCEPT statement. If an operator presses the 
user-assigned function key associated with that indicator, a value of 1 is passed back to the indicator field, setting 
the indicator on. 


Figure 7-6. COBOL Program Entries for Indicators (Part 2 of 2) 


7.3.2.3. Additional Coding Considerations for Function Keys and Multivolume 
Workstations 


As noted previously, the SPECIAL NAMES paragraph and the ACCEPT and DISPLAY 
verbs have additional clauses not yet discussed. These additional clauses report 
function key input to a COBOL program and support multivolume workstations (where 
several terminals operate under the same Ifd name). 


The complete statement for the SPECIAL NAMES paragraph is: 


SYSFORMAT IS mnemonic-name ASSIGN TO workstation lLfd-name 
[CONTROL AREA IS record-name] [WITH FUNCTION-KEYS] [WITH CONNECT- FREE] 


The CONTROL AREA clause specifies a 40-character area that receives data describing 
workstation activity. Among the benefits of having a control area are: 


= Providing a better means of recovery when an error occurs. This is especially useful 
in a multiple-workstation environment. If your program encounters a problem with 
one workstation, it can be directed to handle the problem without affecting the 
other workstations connected to it. 


m Reporting when a workstation is connected to or freed from your program and 
directing your program to follow a course of action as a result. 


= Reporting function/command key input. You can direct your program to perform 
some operation when a_ workstation operator presses a_ user-assigned 
function/command key. 


The control area can be defined in the WORKING-STORAGE or LINKAGE sections of 
your program. You code the control area as follows: 
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eee 


01 WRKSTN-CONTROL. 


@5 wWS-ID PIC 999. 
95 FILLER PIC X. 

95 WS-STATUS PIC XX. 

@5 FUNCTION-KEY PIC 99. 

95 FORMAT -NAME PIC X(8). 
5 NUMBER -CONNECTED PIC 99. 

@5 SIZE-OF-DATA TRANSFER PIC 9(5). 
95 FILLER PIC X(17). 


= WRKSTN-CONTROL is a sample record name for the control area. 


= #WS-ID identifies the workstation where the most recent ACCEPT or DISPLAY 
operation was performed. 


m WS-STATUS reports a 2-character status code for the workstation that performed 
the most recent ACCEPT or DISPLAY. Status code details are listed in Table 7-1. 


a #FORMAT-NAME is the name of the screen format that is active on the workstation 
terminal that was the object of the most recent ACCEPT or DISPLAY. 


Table 7-1. Status Keys 


Status Key 1 Status Key 2 
0 Successful completion 





No further information 







Function key 15 received 


Only active terminal has disconnected 









(Status key 98 may take precedence.) 


Invalid format Format not found 


3 Permanent error 


9 Workstation exception 








Format constructed incorrectly 









No further. information 












1 Terminal not compatible with format 
Statement not compatible with format 
Data not compatible with format 
Data area not large enough for format 
Function key, no data 
New device connected, no data 
Device disconnected (freed), no data 


Device not connected 
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© mw §FUNCTION-KEY holds the number (from 1 to 22) of the function key pressed by an 
operator prior to the most recent ACCEPT. It is set to zero instead of a function 
key whenever data is accepted. The FUNCTION-KEY field is maintained only if the 
WITH FUNCTION-KEYS phrase is specified. You can have one response indicator 
set by more than one function key. In fact, any combination of function keys and 
response indicators may be specified. 


ms SIZE-OF-DATA-TRANSFER holds the number of characters actually sent to or 
received from the workstation screen. On a DISPLAY or ACCEPT operation, this 
number reflects the number of characters required by the format. 


The WITH FUNCTION-KEYS clause specifies that whenever function key input is 
received on an ACCEPT verb, that function key value is reported to the control area. 


The WITH CONNECT-FREE clause specifies that your program is directed to a particular 


procedure (an EXCEPTION path that is described later) when a terminal connects to or 
disconnects from your program. 


The complete format for the ACCEPT statement is: 


ACCEPT identifier-1 [,identifier-2...] 
FROM SPECIFIC mnemonic -name 


USING co 
Literal 


[ON EXCEPTION imperative-statement ] 





SPECIFIC has meaning only for multivolume workstations. It indicates that input is to be 
accepted only from the particular workstation whose ID is given in WS-ID. If you use 
SPECIFIC, your program waits until the specified workstation supplies data, effectively 
locking out the other workstations. 


You should avoid including a USING clause in an ACCEPT statement when you're 
working with multivolume workstation files. Under such conditions, the object of the 
USING clause in an ACCEPT statement is always the workstation that performed the 
most recent ACCEPT or DISPLAY (the workstation identified by V/S-ID in the control 
area). This means if you specify a particular format name in the USING clause, that 
format will appear on only one workstation — the one that performed the last DISPLAY 
or ACCEPT. As a result, the workstation (and corresponding format) supplying the data 
for the ACCEPT statement may be different from the format (and corresponding 
workstation) specified by the USING clause. 


The ON EXCEPTION clause directs your program to follow a different path whenever 
certain conditions arise, such as: 


| When certain errors occur 





_ = #@ If a workstation is connected to or freed from your program 





When a user-assigned function key is pressed (This does not include function keys 
associated with a response indicator.) 
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If you specify a control area, you must include the ON EXCEPTION clause in both the 
ACCEPT and DISPLAY statements. If you do not specify a control area, you cannot use 
the ON EXCEPTION clause. 


The ON EXCEPTION clause lets your COBOL program diagnose and recover from errors 
that occur as a result of communication between the program and the workstation. 
When an error occurs, the nature of the problem is reported in the WS-STATUS field of 
the control area as a 2-digit status code. Your program is directed to follow an 
exception path that you define. For example, consider the following: 


ACCEPT INAREA FROM SCREENS USING SCREEN@1 
ON EXCEPTION PERFORM DIAGNOSIS-ROUTINE. 


If an operator enters data that is not compatible with the active screen format, the 
status code 93 (Table 7-1) is reported to the WS-STATUS field of the control area. 
The ON EXCEPTION path is activated and the DIAGNOSIS-ROUTINE is performed. The 
DIAGNOSIS-ROUTINE could prompt some corrective action to be taken, as follows: 


DIAGNOSIS-ROUTINE. 
IF WS-STATUS = 93 
PERFORM BAIL-OUT. 


You can code procedures for the various status codes listed in Table 7-1, including 
procedures to follow when a workstation is connected to or freed from your program. 
As long as you include the CONNECT-FREE clause in the SYSFORMAT statement, each 
time a workstation connects to or is freed from your program, a status code is reported 
in the WS-STATUS field and an exception path is activated. Table 7—2 summarizes the 
effects of connect/free reporting. 


Table 7-2. Effects of Connect-Free Reporting 


Workstation Options Response to Connect or Free 








Set WS-STATUS to 97 or 98. 
Set WS-ID to report the device that connected or freed. 
Update NUMBER-CONNECTED. 

Execute the EXCEPTION clause. 


CONTROL AREA WITH 
CONNECT /FREE 










CONTROL AREA 
without CONNECT /FREE 


Update NUMBER-CONNECTED. 
If NUMBER-CONNECTED = 0, set status for end-of-file and execute the 
EXCEPTION clause. 

Otherwise, do not return control to the COBOL program until data is received. 


CONTROL AREA not If no terminal remains connected, terminate the program abnormally. 
specified Otherwise, do not return control to the COBOL program until data is received. 


A user-assigned function key can also activate an exception path as long as no 
response indicator is associated with it. When an operator presses a user-assigned 
function key, the function key value is reported in the FUNCTION-KEY field, status code 
95 is returned to the WS-STATUS field, and the ON EXCEPTION clause is activated. 
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For example, suppose you want your own help screen displayed whenever function key 
5 is pressed. As long as youve specified a CONTROL AREA and the WITH 
FUNCTION-KEYS clause, you can code your program as follows: 


ACCEPT INAREA FROM SCREENS USING SCREENO' 
ON EXCEPTION PERFORM DIAGNOSIS-ROUTINE 


DIAGNOSIS-ROUTINE. 
IF WS-STATUS = 95 PERFORM PROCESS -FUNCTION-KEY. 


PROCESS-FUNCTION-KEY. 
IF FUNCTION-KEY = 5 
PERFORM DISPLAY-HELP 


If a function key is associated with a response indicator, the exception path is not 
activated. Only the function key number is returned to the FUNCTION-KEYS field of the 
control area. You must code your program to test for the value returned in the 
response indicator field and then direct your program to perform a specific function. 


Table 7-3 summarizes the effects of function key input. 
Table 7-3. Effects of Function Key Reporting 


Response to Function Key Input 
Workstation 


Options Response Indicator Set Response Indicators 
by Function Key Absent or Unaffected 
















CONTROL AREA with 
WITH FUNCTION-KEYS 







Set FUNCTION-KEY. 
Activate the EXCEPTION 
clause. 


Return indicators without 
screen data. 

Set FUNCTION-KEY. 

Do not activate the 
EXCEPTION clause. 






























CONTROL AREA 
without WITH 
FUNCTION-KEYS 


Return indicators 
without screen data. 
Do not set 
FUNCTION-KEY. 

Do not activate the 
EXCEPTION clause. 









Ignore the function key 
input. 

Do not return control 
to the COBOL program 
until data is received. 






CONTROL AREA not 
specified 






Return indicators 
without screen data. 


Ignore the function key 
input. 

Do not return contro! 
to the COBOL program 
until data is received. 
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OO pr 


The complete format for the DISPLAY verb is: ©} 


DISPLAY identifier-1 [identifier-2]... 
UPON mnemonic-name 
— identifier -3 ] 
ea 
[ON EXCEPTION imperative-statement] 


The EXCEPTION clause for the DISPLAY statement performs most of the same 
functions as it does for the ACCEPT statement. It directs your program to follow an 
alternate path if certain errors occur when data is sent out to a screen format at a 
particular workstation. 


Refer to the 1974 ANSI COBOL programmer reference for more information concerning 
COBOL programming in general. 


7.3.2.4. Considerations for Workstations with Interprogram Communication 


When you combine separately compiled COBOL programs to form a single run unit and 
to interact with the same workstation, these guidelines apply: 


= §8In all programs, the SYSFORMAT IS statements should be identical except for the 
mnemonic-name, which is local to each program. While most workstation functions @ 
will still behave correctly if the SYSFORMAT statements aren't identical, function 
key input and connect-free events may occur without being reported to the COBOL 
program. 


= You should establish a CONTROL AREA in the main program, reference it in the 
LINKAGE SECTION of the subprograms, and include it as an operand in the USING 
clause in CALL statements. 

7.3.3. FORTRAN 

Screen format services is activated by the FORTRAN system whenever the 

SCREEN=name option occurs in the sequential READ or WRITE statement as shown in 


the following examples: 


READ (20,100,SCREEN='TESTSCR1')I 





ra REAL*8 NAME/'TESTSCR2'/ 

WRITE (20,200, SCREEN=NAME) 
The unit argument must be connected to a workstation device, and the screen name i 
specified by the literal or variable after ‘SCREEN=’ must be the 1- to 8-character name © 


that was assigned to the format (via the home screen) when it was created. 
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In cases where a format is used for both input and output, the screen name must be 
specified in the first WRITE statement to create the output fields. The same screen 
name must then be specified in a READ statement. 


Both formatted and unformatted |/O is permitted for a screen format. 

m Formatted |/O 
Each screen field must be defined with DISPLAY. The field lengths must exactly 
match the lengths of the actual screen format fields as specified during the SFG 
session. The following example requires that ‘TESTSCR1° have a 3-character input 


display field: 


READ (20,100,SCREEN='TESTSCR1' )I 
10@ FORMAT (13) 


= Unformatted I/O 


Unformatted I/O is only permitted for characters and integers. Logical and real 
values are restricted. The internal lengths defined for the screen format must match 
the FORTRAN data sizes. 


Y 
N 
© 


Data 








& 


INTEGER 
REAL 

REAL*8 
LOGICAL 
INTEGER*2 
LOGICAL*1 
COMPLEX 
COMPLEX* 16 


MDO-NAROALA 


om 


Refer to the FORTRAN IV programmer reference for more information concerning 
FORTRAN IV programming in general. 


7.3.4. BAL 


The imperative macroinstructions associated with using screen format services are 
OPEN, CLOSE, DMSEL (SELECT), DMINP (INPUT), and DMOUT (OUTPUT). 
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7.3.4.1. Open a File (OPEN) 


You use this macroinstruction to initialize a file. This instruction establishes a logical 
access path (LAP) to the physical file. Only one file can be opened when you issue this 
instruction. If you want to access more than one file, you must issue an OPEN 
instruction for each of the files. You must issue this instruction for a file before you 
attempt any processing. 


Format: 


LABEL AOPERATIONA OPERAND 


cdibname ,{ (ribname) 
(1) (0) 
1 0 


[name ] 





Positional Parameter 1: 


cdibname 
Is the symbolic address of the CDIB that contains the screen name that was 
assigned to the file by the LFD job control statement. 


(1) or 1 
Indicates that you have preloaded register 1 with the address of the CDIB for 
the file to be opened. 


Positional Parameter 2: 


ribname 
Is the symbolic address of the RIB associated with the file to be opened. 


(9) or @ 
Indicates that you have preloaded register O with the address of the RIB 
associated with the file. If you load register O with a value of zero, this 
indicates that there is no RIB associated with the file. (This also means that a 
RIB cannot reside at relative address X‘O00000’.) 


lf a symbolic address is specified for both positional parameter 1 and 
positional parameter 2, the comma shown in the instruction format is optional. 


Example: 


OPEN FILE1 RIB1 
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7.3.4.2. Close a File (CLOSE) 


You use this macroinstruction to terminate file processing. Once a file is closed, it 
cannot be accessed until it is reopened by issuing an OPEN macroinstruction. Only one 
file can be closed when you issue this instruction. If you have more than one file open 
in your program, you must issue a CLOSE instruction for each of the files. 


Format: 





OPERAND 


cdibname 
fe | 


1 


LABEL AOPERATIONA 











Positional Parameter 1: 
cdibname 
Is the symbolic address of the CDIB that contains the screen name that was 
assigned to the file by the LFD job contro! statement. 
(1) or 1 
Indicates that you have preloaded register 1 with the address of the CDIB 
associated with the file to be closed. 


Example: 
1. i SCREEN1 
2. | CLOSE 1 
1. The file whose CDIB has the symbolic address SCREEN1 is to be closed. 


2. The file whose CDIB address has been preloaded into register 1 is to be 
closed. 
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7.3.4.3. Retrieve a Record (DMINP) 


The DMINP imperative makes data from a device available to a user program within a 
work area. The work area must be large enough to handle all input that has been 


entered by the operator. If function keys entered set response indicators, the © 


appropriate number of response indicators must precede the data in the work area. 


Format: 


LABEL AOPERATIONA OPERAND 





{cdibname}, work area 
(@) 


@ 
Positional Parameter 1: 
cdibname 
Specifies the logical file name that symbolically identifies the CBIB to be 
affected. : 


(1) or 1 
Indicates that register 1 contains the address of the CDIB. 


Positional Parameter 2: 


work ‘area 


Specifies the symbolic address of a work area that is to contain all response 
indicators and input data. 


(®) or 
Indicates that register O is the address of a work area. 


NOTES: 


1. You need not issue a DMSEL imperative prior to the first imperative if JCL 
specification was provided with an initial screen selection. 


2. If you issue the DMINP imperative without issuing the DMOUT imperative, screen 
format services issues a DMOUT imperative for the format in effect (whether 
specific or from JCL). All input fields are displayed with the replenish value. If any 


output or bidirectional fields exist, however, an error is returned and the DMOUT is 
not issued. 


& 
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@ 3. If the input record size specified for variable-length records is not large enough, an 
error is returned and no read operation is issued. 


4. For variable-length records, the size of the variable data plus the number of 
response indicators plus 4 followed by two blanks is moved to the first two bytes 
of the work area. 


lf the DMINP is unsuccessful, CD$DDINF+ 11 contains one of the following error codes: 


X'04" 


X'05' 


X‘06' 


X'07' 


X' 10° 


X'11' 


X12’ 





X'14' 


X‘15' 


X*16' 


X17" 


X18" 


X19" 





X*13' 


Invalid input record size 

Output only screen format 
Output only device 

Invalid SFS imperative sequence 
Record level format error 
Imperative abnormally terminated 
Field level format error 

DSD field level format error 
Undecipherable characters in the input buffer 
Physical |/O error 

Conversion error 

Maximum retries exceeded 

DSD syntax error 


Function key 16 entered 
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7.3.4.4. Select a Screen Format (DMSEL,SCREEN) 


You use the DMSEL,SCREEN imperative macroinstruction to indicate which screen 
format is to be displayed. 


Format: 


OPERAND 
cdibname }, SCREEN, 
te | 


AOPERATIONA 













1 


screen format name). 
[. | 
1) 


Positional Parameter 1: 


cdibname 
Is the symbolic address of the CDIB that contains the name that was assigned 
to the file by the LFD job control statement. 


(1) or 1 
Indicates that you have preloaded register 1 with the address of the CDIB. 


Positional Parameter 2: 


SCREEN 
Indicates that you are selecting a screen format from a screen format file. 


Positional Parameter 3: 


screen format name . 
Is the symbolic address of an 8-byte area that contains the name of the screen 
format to be selected. 


(@) or @ 
Indicates that you have preloaded the address of the screen format name in 
register O. 





S 
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6 Example: 


DMSEL WORKSTN,SCREEN,S1 


Selects the screen format named in the 8-byte area $1. 


lf the format name provided contains all X‘00’, the effect is to terminate screen format 
services. If you subsequently issue a DMSEL with a format name, screen format 
services is reactivated. 

NOTE: 


Resetting screen format services is not permitted for a multiworkstation file. An invalid 
imperative error code is returned should an attempt be made to do so. 


The error conditions returned in CD$DDINF + 11 are: 
X‘21' Format name specified could not be found 
X‘22' 1/0 error while reading the format 
X‘20' Format width greater than screen width 


@ X‘11' Imperative abnormally terminated 
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7.3.4.5. Output a Record (DMOUT) 


The DMOUT imperative permits the user data to be merged from the user’s work area 


with a previously selected format, which is then presented to the device. The keyboard 
is also unlocked. 













Format: 
LABEL AOPERATIONA OPERAND 
ycdibname,,;work area 
{< | feo» | 
1 "y 
Positional Parameter 1: 
cdibname | 
Specifies the logical file name that symbolically identifies the CDIB to be 
affected. 


(1) or 1 
Indicates that register 1 contains the address of the CDIB. 


Positional Parameter 2: 


work area 


Specifies a positional parameter defining a user work area that contains any 
option indicators and all fields to be merged with the format. 


(0) or @ 
Indicates register O points to the user’s work area. 


lf the output record size specified for variable-length records is not large enough, an 
error will be returned and the partial buffer will not be sent. 
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© The error codes reported in CDSDDINF+ 11 are: 


X'03' Invalid output record size 

X'08" ~—s:1/0 or INT-2 conversion error 
X'09" ___sInvalid screen format 

X‘11° — Imperative abnormally terminated 


X'26' Output verification error 


x‘29' Device freed 


7.3.5. ESCORT 


When you create a screen format, you give ESCORT a special format in which to output 

file data. You still designate a structure, but instead of your file being output in the 

default structure format, it’s linked with your screen format. When you designate a 

screen format, the fields you link to it must be identical to the fields contained in a 

structure. They must have the same name, and they must be in the same order as the 

corresponding fields in your structure. Both the format and your structure must also 
& have the same number of fields. 


For example, if you designate 10 fields in a format and link it to a structure with only 9 
fields, you get an error because ESCORT keeps looking for the 10th field. 


It is possible, however, to have a structure with 10 fields and an output format using 
only 5 fields, but only the first 5 fields of your structure are output. Although you can 
do it this way, it’s always better to have a direct structure/format linkup to eliminate 
confusion. 


Depending on the type of ESCORT program you use with a format (ENTER DATA, 
CHANGE DATA, SELECT DATA), the following requirements apply: 


m ENTER DATA 


Specify all fields in the format as input (I). 


m CHANGE DATA 
Specify all fields in the format as both input and output (B). 
Protect the decimal point in decimal numbers with a slash. 


@ You cannot use packed decimal fields in a format. The initial display does not 
display underlines for the packed field. 


When the format is first displayed, only the key field is read. ESCORT ignores all 
other data until the master record is displayed and changed. 
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m SELECT (display) DATA 


Specify all fields as both input and output (B) or as output only (O). When you 
display data using only output fields, you must define at least one input field to 
hold the screen until the XMIT key is pressed. ESCORT ignores any data sent from 
this input field (B or |). 


7.3.6. IMS Programming Considerations 
m General Considerations: 
— UNISCOPE 100 and 200 terminals must have the PROTECT feature. 


—- UTS 400 terminals (if operating in native mode) must have the PROTECT 
feature; FCC switch set to FCC; and control page set to XMIT variable. 


— SFS parameter specifying the number of terminals that use screen formats at 
the same time. 


— RESFMT parameter indicating the maximum number of screen formats that 
remain resident between SFS calls. 


—- CALL ‘BUILD’ and CALL/ZG#CALL BUILD commands call screen format 
services in COBOL and BAL action programs, respectively. A K in column 42 
of the output specifications forms calls screen format services in RPG II action 
programs. You must not specify the USE SFS job control statement. 


- The IMS CALL REBUILD or the data management DMCTL_ INERR/ 
INERRMSG imperatives may not be used in conjunction with formats containing 
conditional protect and/or hidden field. Instead, the program could use option 
indicators to blink the field via a CALL BUILD or DMOUT imperative. 


m RPG Il Action Program Considerations: 

— Input Format Specifications Form 
Every variable data field with an I|/O direction of input or both input and output 
(bidirectional) must be identified on the input format specifications form. The 


field names need not correspond to those that were assigned to the actual 
format fields during generation. 
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The field location entries on the RPG Il form refer to the position of these 
fields with respect to the input data rather than to the position of the input 
fields on the screen. This is simply because data is either read from the format 
(from input or bidirectional fields) or written to the format (to output or 
bidirectional fields) automatically — according to the sequence in which the 
variable data fields were described when the format was created. 


Field lengths are counted sequentially. The FROM entry for the first input or 
bidirectional field is always 1, and the TO entry is always the number of the 
last underline in the field as defined in the format. The FROM entry for the next 
field picks up where the TO entry for the previous field left off. The underlines 
are counted in relation to this number to get the TO entry. 


Let's say that the first input or bidirectional field in the format has a length of 
10, and the second has a length of 12. The FROM and TO entries for the first 
field are 1 and 10. Entries for the second field are therefore 11 and 22. Output 
fields are not counted at all. If an output field is located between two input or 
bidirectional fields, simply bypass it. 


Control levels, matching fields, and look-ahead fields may not be used with 
workstation input. 


Output Format Specifications Form 


Every variable data field with an 1/O direction of output or bidirectional must be 
identified on the output format specifications form. This includes any 
bidirectional field that was defined on the input format specifications form. 


The END POSITION entries refer to the end positions within the output data 
and not to their positions on the screen. For example, if there are two output 
or bidirectional fields with lengths of 10 and 12 respectively, the end position 
for the first field is 10, and that of the second field is 12. 


The name of the format, as it was specified on the home screen, must be 
entered in the CONSTANT OR EDIT WORD field (columns 45-52) and 
enclosed in apostrophes. The length of the format name must be entered in 
column 43 with the letter K preceding it (column 42). 


Use of a first-page indicator is not permitted. 


For more details regarding RPG II action program considerations, refer to IMS 
action programming in RPG Il, UP-9206 (current version). 


COBOL Action Programs 


The COBOL compiler does not interface with screen format services. All interfaces 
with screen format services are through IMS (CALL BUILD). See Appendix F for a 
sample IMS COBOL action program (JAMENU) for screen format services and refer 
to IMS action programming in COBOL and Basic Assembly Language (BAL), 
UP-9207 (current version), for a detailed description. | 
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BAL Action Programs 


Same as COBOL 


7.4. CONSIDERATIONS FOR THE WORKSTATION OPERATOR 


The following guidelines apply when you enter data on a screen format: 


After you enter data on a screen, make sure the cursor is beyond the last field of 
the format before transmitting. If you return to a particular field to correct an error 
before transmission, correct the error, position the cursor beyond the last field, and 
then transmit. 

If you return to a particular field to correct an error after transmission, simply 
correct the error and transmit. You don't have to position the cursor beyond the 
last field. 

The following are function keys you should not use and operations you should not 
perform while a screen format is active. Disruption of device control information in 
the workstation and possibly termination of input transmission may occur. (An 
SF16 error results.) The restricted keys and operations are: 

— INSERT LINE 

— DELETE LINE 

~— LINE DUP 

— DISPLAY ERASE 

— FCC GEN 

— FCC CLEAR 

~ FCC ENABLE 

— RESET 

— TAB SET (causes an SF14 error) 

— Changing the control page XMIT option to other than VAR 


— Switching to simulated system mode on a UNISCOPE terminal 


~ Powering off the workstation 
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Appendix A. Job Control Considerations 


A.1. THE USE SFS STATEMENT 
You must indicate within the DVC/LFD sequence for the workstation that screen 
formats are to be used. This is done via the USE SFS job control statement. The 


optional positional parameters in this statement may be used as necessary. The format 
for the statement is: 


//{symbol] USE SFS = ees 


format-file-lfd 


[, initial-screen] i \ 
1 


[,screen-format-1=alias-1,...,screen-format-12=alias-12] 
where: 


SFS 
Indicates that the program is to use a screen format. 





—_ Cd 


format-file-lfd 


In this parameter, you can provide an lfd name for up two screen format files. 
Any name you use must match an Ifd name specified in a previously defined 
device assignment set for a screen format file. (Screen format files are always 
MIRAM files.) The format-file-lfd is one to eight alphanumeric characters long. 


When coding this parameter, remember the following: 


= If you omit a format-file-lfd name, it is assumed that all screen formats 
used reside in the system file $Y$FMT. 


m If you code /format-file-lfd-2 alone, $Y$FMT is examined first then the file 
indicated by format-file-lfd-2. 
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= If you code format-file-lfd-1/ alone, the file indicated by format-file-lfd-1 is 
examined first then $YSFMT. 


uw §=6 If you code format-file-lfd alone, only the file indicated by format-file-lfd is 
examined. 


m If you specify format-file-lfd-1/format-file-lfd-2, a search will be made in 
format-file-lfd-1 first. If the format isn’t found, format-file-lfd-2 will be 
searched. 


initial -screen 
The initial screen name refers to the 1- to 8-character name (as defined on the 
home screen) for a format. Use of this parameter depends on the program's 
language. 


BAL 
The initial screen name indicates the first format to be used by the 
program. A DMSEL imperative need not be issued to use this format as 
the initial format. Refer to 7.3.4 and the consolidated data management 
macro language user guide/programmer reference for further information 
on BAL macros. 


COBOL 
The initial screen name indicates the first format to be used by the 
program. 





Refer to 7.3.2 and the 1974 ANSI COBOL programmer reference for 
further information on the SYSFORMAT IS statement and the use of 
screen formats with a COBOL program. | 


RPG Il 
This parameter should not be used with an RPG Il program. Refer to 7.3.1 
and the RPG {I user guide for further discussion of RPG II programming 
and screen formats. 


FORTRAN IV 
This parameter may be used with a FORTRAN program. Refer to 7.3.3 
and the FORTRAN IV programmer reference for more information on 
FORTRAN programming. 


nnn 

i} 
This parameter indicates the number of formats to be present in main storage 
at any one time. !t should only be used if the program is going to alternate 
regularly between two or more formats. The default for this parameter is 1, 


but you may specify any number from 2 to 255. The number of formats that 
the program uses is not limited to the number specified here. 





lf you accept the default, regardless of how many formats a program is going 
to use, only one format will ever be present in main storage. When the first 
format is called by the program, it is placed in main storage. When the second 
is called, it replaces the first, and so on. 
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The number 3 entered for this parameter indicates that three formats can 
reside in main storage throughout the program use. You might use this 
parameter when a program is constantly going to alternate between the same 
three formats. As a result, the I/O activity that would be necessary to bring 
the formats back and forth (if the default were accepted) is eliminated. By the 
same token, however, more main storage is used up to accommodate three 
formats. 


Remember, the number 3 does not restrict the program to the use of only 
three formats. It means that three formats can reside in main storage at once. 
If the program uses only three, the same three will always be present. If it 
uses more, which three formats are present depends on which ones the 
program calls and when. 


screen-format-i=alias-1,... 


This parameter permits you to equate the name that was given to the format 
when it was created with a name that the program uses for that format. 


Suppose SCREENO1 was the name specified on the home screen during 
generation. Supplying the alias parameter as SCREENO1=MYSCREEN means 
that the program is using the name MYSCREEN instead of SCREENO1. No 
more than 12 alias names may be specified. 


The following is an example of the USE statement with some accompanying 
parameters. 


// USE SFS,FORMFIL,,2,SCREEN@2OMYSCREEN 


This statement indicates: 


= The formats to be used are on a library file other than $Y$FMT. The Ifd-name for 
that file is FORMEFIL. 


= Two formats will reside in main storage. 


= ~§=©The program will use the name MYSCREEN when referencing SCREENO2. 


The following are some examples of job control DVC/LFD sequences containing the 
USE SFS statement. 
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Example 1: 


// JOB PAYROL 


// DVC 200 OVC/LFD sequence 
// USE SFS for the workstation 
// UID S$YSMAS {f file 

// LFD WRKSTN 


// EXEC PRSNL 


Example 2: 


// JOB PAYROL 


// DVC 200 DVC/LFD 


// USE SFS,,,,SCREEN@2OMYSCREENJ sequence 

// UID W1 for the 

// LFD WRKSTN workstation 
file 


// EXEC PRSNL 


Both of these examples contain a DVC/LFD sequence for the workstation where the 
device code number is 200 and the name that the program will use to reference the 
workstation is WRKSTN. In both cases, the formats to be used are on $Y$FMT; 
therefore, no LFD/DVC sequence is given for this file and the USE statement does not 
specify a format's file Ifd name. The USE statement in example 2 specifies the alias 
parameter. 
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@ Now consider these examples: 


Example 1: 


// JOB PAYROL 


// DVC 50 
// VOL DOOO28 
// LBL FORMFIL 


DVC/LFD sequence 
for the user 


library file 
// LFD SCRNS 
// DVC 200 DVC/LFD sequence 
// USE SFS,SCRNSF for the 
// UID W1 workstation 


// LFD WRKSTN 


// EXEC PRSNL 





Example 2: 





// JOB PAYROL 


// DVC 5@ 
// VOL DO0028 
// LBL FORMIL 


DVC/LFD sequence 
for the user 


library file 
// LFD SCRNS 
// OVC 200 DVC/LFD 
// USE SFS,SCRNS,,3,SCRN@3=MYSCRN| sequence 
// UID W1 for the 
// LFD WRKSTN workstation 


// EXEC PRSNL 
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In both examples, the formats are stored on a user-assigned MIRAM library file; 
consequently, a DVC/LFD sequence for this file must be given. The USE SFS statement 
within the workstation DVC/LFD sequence must specify the Ifd-name for the user library 
file as shown. The number of formats to be present in main storage at any one time is 
specified as 3. The alias parameter is also specified. For more information concerning 
job control in general, refer to the job control user guide. 


If your program interfaces with both the Menu Processor and Screen Format Services 
you need only supply the // USE statement specifying the MENU option. Refer to menu 
services concepts and facilities, UP-9317 (current version). The SFS option for the 
// USE statement is not necessary for the dual interface, provided you perform screen 
selection within the program. 


A.2. JOB CONTROL FOR MULTIPLE WORKSTATIONS 


When building a job control stream for a job that uses screen formats, you may specify 
the use of more than one workstation. This allows several operators to work with a 
screen format at once. The following is an example of a job control stream that 
specifies multiple workstation use. 


Request for EDT LOGON MG2 

{the general editor) EDT 
// JOB SCREENIT 

Device assignment // OVC 200(3),REQ(3) 

set (DVC/LFD // USE SFS 

sequence) for // UID W1,W2,W3 

the workstation // LED WORKSTN 

Device assignment Me ee 

hee ipenaa // VOL D660028 

wauroll <proorarh // LBL LODLIBRARY 
// LFD LODLIB 

Device assignment // DVC 52 

set for the // VOL D®O0028 

input data // LBL INPAYROLL 

file // LED INPAY 

Device assignment // DVC 52 

set for the // VOL 0000028 

Output data // LBL QUTPAYROLL 

file // LED OUTPAY 
// EXEC PAYROLL,LODLIB 
/& 

EDT comaande peas MODULE=SCREENIT, FILENAME=SAVE JOBS, VSN=D000028 
@HALT 
LOGOFF 
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@ The DVC for the workstation indicates that three workstations are to be used and that 
the job will not be scheduled until three workstations are available (as indicated by the 
REQ parameter). 


Although not directly related to the DVC and UID statements for multiple workstation 
use, there are some other items related to this job control stream worth mentioning. 


@ When working with multiple workstations, you may include the FREE statement 
either within the job control stream or enter it directly at the workstation as a 
command to free one or more workstations when their use is no longer required. 


= As shown in the example, you may use the EDT, @WRITE, and @HALT commands 
so that the next time you want to run this job all you have to do is enter 


LOGON MG2 : 
RV SCREENIT, (SAVEJOBS ,D000028) 


at the workstation. 


=» You must include the USE SFS statement (A.1) in the DVC/LFD sequence for the 
workstation whenever screen formats are used. 
m™ Since there is no DVC/LFD sequence for a screen format file, it is assumed that all 
& formats are in the library $Y$FMT on SYSRES. 
For more information about job control, see the job control user guide, UP-9986 


(current version). For more information about EDT, see the general editor user 
guide/programmer reference, UP—9976 (current version). 











_——— 
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Appendix B. The 12-Line Screen Display 


The following screen formats should be used as a reference for operators that execute 
screen format services on a workstation with only a 12-line capacity. Katakana 
workstations display data in uppercase letters. 


HOME SCREEN 












4 DELETE 





FUNCTION 1 CREATE 2 CREATE-FROM 3 MODIFY 





(1): 






5 SHOW 6 LIST 7 SPOOL 8 TERMINATE 
OLD FORMAT NAME (| ) IS ON THE FOLLOWING LIBRARY: 
FILE NAME: ($YSFMT ) VOLUME: (RES ) 













NEW FORMAT NAME ( ) IS TO BE STORED ON THE FOLLOWING LIBRARY: 
FILE NAME: (SYSFMT ) VOLUME: (RES ) 
IF THIS FILE DOES NOT EXIST, ALLOCATE (@@2) CYLINDERS. INCREMENT IS (01) CYL. 





**FUNCTION KEYS ARE:F1-GO TO HOME SCREEN, F5-BREAKPOINT SPOOL FILE, 
F13-HELP, F14-EXIT HELP, F2@-RESTORE SCREEN 






CHARACTERISTICS SCREEN 


GLOBAL CHARACTERISTICS FOR FORMAT xxxxXxXxxx: 

ERROR RETRY COUNT: (@2) ALPHABET: (ENGLISH) LOWER CASE TRANSLATION:(1) 1 YES 2 NO 
SCREEN FORMAT IS (1): 1 ORIGINAL 2 OVERLAY 

ERASE/UNLOCK BY (1): 1 NONE 2 REPLENISH 3 ERASE 4 UNLOCK KEYBOARD 5 CONDITIONAL 
TRANSMIT ALL, DISREGARD CURSOR POSITION? (1): NO 2 YES 


EDITING CHARACTERS? (1): 1 NO 2 YES. SPECIAL DISPLAY CONTROL? (1): 1 NO 2 YES 
DO YOU WISH TO SPECIFY AN ERROR MESSAGE FIELD? (1): 1 NO 2 YES 

DISPLAY RETENTION ON ALL FIELDS? (1): 1 NO 2 YES | 

FUNCTION COMMAND KEYS TO BE DEFINED? (1): 1NO 2 YES 

DOES THIS FORMAT HAVE A NON-DISPLAYED CONSTANT? (1): 1NO 2 YES 
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CONDITIONAL ERASE/REPLENISH SCREEN 








ENTER THE CONDITIONAL ACTION DESIRED AFTER INPUT FOR FORMAT nnnnnnnn 








DO YOU WISH ALL INPUT-ONLY FIELDS TO BE REPLENISHED AFTER INPUT 
BASED UPON A CONDITIONAL INDICATOR? (1): 1.NO 2 YES INDICATOR (Y ___) 


DO YOU WISH TO HAVE THE SCREEN ERASED AFTER INPUT 
BASED UPON A CONDITIONAL INDICATOR? (1): 1 NO 2 YES INDICATOR (Y ___) 






EDIT SCREEN 







ENTER EDIT CHARACTERS IN PARENTHESES TO BE USED FOR FORMAT nnnnnnnn 










STANDARD CHAR : MEANING: = CHAR TO BE USED 
$ : CURRENCY SIGN = ($) 
- : DECIMAL SYMBOL = (.) 
, = THOUSANDS PUNCT. = (,) 
* : REPLACEMENT CHAR = (*) 
CR: CREDIT ON NEGATIVE = (CR) 
DB: DEBIT ON NEGATIVE = (DB) 
> REPLENISH CHAR = (_) 


NOTE: MAKE SURE NO SYMBOL IS AMBIGUOUS WITH ANY VALID PICTURE STRING CHARACTER. 






SPECIAL DISPLAY SCREEN 


ENTER THE DISPLAY PROPERTIES FOR FORMAT nnnnnnnn: 


INTENSITY EMPHASIS: 


DISPLAY CONSTANTS (B) 
OUTPUT VARIABLES (B) 
INPUT CAPABLE FIELDS CA) 
FIELDS ENTERED IN ERROR CA) 


INTENSITY: EMPHASIS: 


A. NORMAL INTENSITY 1. UNDERLINED 4. REVERSE VIDEO 
B. ALTERNATE (LOW INTENSITY) 2. COLUMN SEPARATORS 5. BLINK FIELD 
. 3. STRIKE THRU BARS 





~ 


eye 
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ERROR MESSAGE SCREEN 










MESSAGE FIELD NAME IS: 







DISPLAY ATTRIBUTES: 





INTENSITY: 
A. NORMAL INTENSITY 
B. ALTERNATE (LOW) INTENSITY 






DISPLAY RETENTION SCREEN 


NUMBER OF LINES IN ERROR MESSAGE: 
DISPLAY ERROR MESSAGE ON LINE NUMBER: 
ERROR MESSAGES CONDITIONALLY DISPLAYED: 
INTENSITY (A) 
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(ERRORMSG) 

(1) ENTER 1 OR 2 
(LAST) 
INDICATOR (Y ___) 
EMPHASIS: ( ) 





EMPHASIS: 
1. UNDERLINED 


ENTER THE FOLLOWING INFORMATION FOR YOUR ERROR MESSAGES FOR FORMAT nnnnnnnn 


ENTER NUMBER OR 'LAST' 


2. COLUMN SEPARATORS 5. BLINK FIELD 


3. STRIKE THRU BARS 


DO YOU WISH THE DISPLAY IMAGE TO BE CONDITIONALLY RETAINED 


FOR ALL FIELDS OF FORMAT nnnnnnnn? (1): = 1 


INDICATOR (Y __) 


NO 2 YES 





4. REVERSE VIDEO 






CIF THIS IS SELECTED, AN OUTPUT COMMAND WILL AFFECT DISPLAY ATTRIBUTES ONLY 
UNLESS OVERRIDDEN AT FIELD LEVEL VIA DIALOG 5.) 


FUNCTION/COMMAND KEY SCREEN 






















(USE FUNCTION KEY#13 FOR HELP. 


ENTER THE FUNCTION/COMMAND KEYS TO BE USED BY FORMAT nnnnnnnn 


KEY# ACCEPT? RESPONSE KEY# ACCEPT? RESPONSE KEY# ACCEPT? 
F 4 (N) (_) F2 (N) (___) F3 (N) 

F4 (N) (_) F5 (N) (___) F6 (N) 

F7 (N) (___) F8 (N) (+) F9 (N) 
F1® = (N) (_) F114 (N) ( _) F12—(N) 
F139 CN) (_) F14 CN) (_) F15 (NN) 
F160 (N) (_) F17 ss (N) (_) F18 CN) 
F119 (N) Cuca) F20 =(N) (__) F21 (N) 
F22 (N) (_) 


THIS WILL EXPLAIN INDICATOR SYNTAX.) 


CL 
(_ 
C_ 
C_ 
C 
CL 
C_ 











RESPONSE 
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NONDISPLAY SCREEN 











DESCRIBE THE SINGLE NON-DISPLAYED FIELD FOR FORMAT nnnnnnnn 





LENGTH OF THIS FIELD IS (_) 
VALUE OF FIELD IS (1): 


1 - FIRST FIELD OUTPUT BY PROGRAM (FIELD IS BIDIRECTIONAL) 
2 - FIELD IS INPUT-ONLY, VALUE IS: 






THIS VALUE IS ALWAYS THE FIRST INPUT FIELD WHICH IS NAMED: (FLD00000) 
IF OPTION #1 IS SELECTED ABOVE, IT IS ALSO THE FIRST OUTPUT FIELD. 


DIALOG SCREEN 1 


display of the field 


(FLDnnnnn) IS FOR FIELD USE OF (1): 1 OUTPUT 2 INPUT 3 BOTH 
INTERNAL USAGE IS (1): 1 DISPLAY 2 PACKED 3 BINARY 6 ZONED 
INTERNAL LENGTH IS (nn) 


PLEASE INDICATE WHETHER THE FOLLOWING ARE REQUIRED: 1 NO 2 YES 


CONDITIONAL DISPLAY (1) SPECIAL DISPLAY PROPERTIES ( ) 
CONDITIONAL RETENTION . (1) CONDITIONAL PROTECTION ¢ ) 
FIELD CHANGE NOTIFICATION (1) RANGE CHECKING ( ) 
REPLACE "1!" IN THE FOLLOWING LINE WITH INSERTION CHARACTERS: 
display of the field 





DIALOG SCREEN 2 


SOCIAL SECURITY: 999-99-9999 


Field response (1): 1 OPTIONAL 2 REQUIRED 3 MUST-FILL 4 DEFAULT VALUE IS: 


Lowercase translation (1): 1 Yes 2 No 


Initial replenishing value is: 


NOTE: For DEFAULT, alpha characters will be passed to program in upper or 


Lower case as entered. For REPLENISH, alpha characters will be displayed 
as entered. 
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DIALOG SCREEN 3 













display of field 


SPECIFY THE CONDITIONAL INDICATOR WHICH IS TO CONTROL DISPLAY OF FIELD FLDnnnnn 
2 re 


THE FIRST CHARACTER SHOULD BE ''Y'!' IF DISPLAY IS TO OCCUR WHEN THE INDICATOR 
IS ON OR ''N'!' IF DISPLAY IS TO OCCUR WHEN INDICATOR IS OFF. 


F-KEY 13 WILL PROVIDE HELP 





DIALOG SCREEN 4 


display of field 
DISPLAY PROPERTIES FOR FIELD FLDnnnnn: INTENSITY: 
LOWEST PRECEDENCE: I.DEFAULT PROPERTIES CA) 
IT.OPTION IND ¢_ ) (_) 
IIT.OPTION IND (_ (_) 


EMPHASIS: 


) 


) 
IV.OPTION IND ( ___) (_) 
) 


HIGHEST PRECEDENCE:V.OPTION IND (_ 
INTENSITY: 

A.NORMAL INTENSITY 

B.ALTERNATE (LOW) INTENSITY 

C.NOT DISPLAYED 

E.SAME AS FIELDS IN ERROR 


aoe (_) 
EMPHASIS: 
1.UNDERLINED 4.REVERSE VIDEO 
2.COLUMN SEPARATORS 5.BLINK FIELD 
3.STRIKE THRU BARS 6.POSITION CURSOR 





DIALOG SCREEN 5 


display of field 


SPECIFY THE INDICATOR YOU WISH TO CONTROL DISPLAY RETENTION FOR FLDnnnnn 
(Y__) | 


(THIS INDICATOR WILL OVERRIDE FORMAT-LEVEL DISPLAY RETENTION FOR THIS FIELD, 


IF SPECIFIED. IF THIS CONDITION IS MET, AN OUTPUT COMMAND WILL AFFECT THE 
DISPLAY ATTRIBUTES ONLY.) 


F-KEY 13 WILL PROVIDE HELP 
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DIALOG SCREEN 6 







display of field 


SPECIFY THE INDICATOR YOU WISH TO CONTROL PROTECTION OF FIELD FLDnnnnn 
(Y__) 






IF THE FIRST CHARACTER IS reyre, THE FIELD WILL BE PROTECTED WHEN THE INDICATOR 
IS ON. IF ''N'' IS SPECIFIED, PROTECTION OCCURS WHEN THE INDICATOR IS OFF. 


F-KEY 13 WILL PROVIDE HELP 






DIALOG SCREEN 7 


SOCIAL SECURITY: 999-99-9999 


SPECIFY THE INDICATOR YOU WISH TO CONTROL NOTIFICATION OF FIELD CHANGE FOR 
FIELD FLD00007: | 


INDICATOR VALUE: (___) 


NOTE: THIS INDICATOR VALUE WILL BE SET (I.E., TURNED 'ON') IF THIS FIELD IS 
CHANGED ON INPUT. 


FUNCTION KEY #13 WILL PROVIDE HELP. 
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SOCIAL SECURITY: 999-99-9999 
SPECIFY THE TYPE OF CHECK AND RANGE VALUE(S) FOR FIELD FLDOOQOO: 


RANGE CHECK (1): 1 BETWEEN 2 LESS THAN 3 GREATER THAN 4 EQUAL 


> NOT EQUAL 6 LESS/EQUAL 7 GREATER/EQUAL 
RANGE VALUE(S): 


MORE? (1): 1NO 2 YES 





MODIFY SCREEN 


MODIFY OPTION (1): 1 CHANGE TEMPLATE 2 CHANGE TYPE 3 CHANGE I/0 


7 CHANGE TEMPLATE ONLY - NO INTERNAL CHANGES 





Saree 
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SUMMARY SCREEN 





NAME: FORMAT@1 FORMAT SIZE: 08 X 64 DATE: 82/10/29 CREATED FROM: 
ALPHA:SENGLISH FILE: SYSFMT ON RES GEN8 
LINE ORIGIN: 01,01 OVERLAY: NO ERASE/UNLOCK BY: CONDITIONAL INDICATOR 
LOWER CASE TRANSLATION: YES NUMBER OF VARIABLES: 06014 ERROR RETRY COUNT: 
TRANSMIT ALL, REGARDLESS OF CURSOR POSITION: NO 

SPECIAL EDITING CHARACTERS: YES SPECIAL DISPLAY CONTROL: YES 


ERROR MSG. FIELD SPECIFIED: YES DISPLAY RETENTION: NO 
FUNCTION/COMMAND KEYS DEFINED: YES 
FORMAT HAS A NON-DISPLAY CONSTANT: NO 


INPUT ONLY FIELDS TO BE REPLENISHED AFTER INPUT - INDICATOR IS Y 006 


SPECIAL EDITING DISPLAY 


NAME: FORMAT@1 FORMAT SIZE: @7 X 64 DATE: 82/05/25 
SPECIAL EDITING CHARACTERS: YES 


STANDARD CHAR: MEANING CHAR TO BE USED 

$: CURRENCY SYMBOL ($) 

: DECIMAL POINT (/) 

THOUSANDS PUNCT. (,) 

REPLACEMENT CHAR (*) 

CREDIT ON NEGATIVE (CC) 

DEBIT ON NEGATIVE (DD) 

REPLENISH CHAR. (_) 


NAME: FORMATO1 FORMAT SIZE: @7 X 64 DATE: 82/05/25 
DISPLAY CONSTANTS: (B)¢ ) OUTPUT VARIABLES 


INPUT CAPABLE VARIABLES: (A)(____) 
ERROR MESSAGE TO BE DISPLAYED ON LINE NUMBER: LAST NUMBER OF LINES 14 
ERROR MSG. FIELD NAME IS: ERRORMSG ERR.MSG DISPLAY ATTRIBUTES: (B) ¢ 


ERROR MESSAGE TO BE CONDITIONALLY DISPLAYED BASED ON INDICATOR (CY 904) 


INTENSITY: EMPHASIS 


A.NORMAL INTENSITY 1.UNDERLINED 4.REVERSE VIDEO 
B.ALTERNATE (LOW) INTENSITY | 2.COLUMN SEPARATORS 5.BLINK FIELD 
3.STRIKE THRU BARS 


B-7 


02 
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LIST SCREEN 
NAME: FORMATO1 FORMAT SIZE: 7 X 64 DATE: 82/25/05 
FIELD-ID (X,Y) 1/0 EXTRNAL INTRNAL RESPN REPLN RANGE COND 
| TYP LNGH TYP BYT DIGIT 

FLD09901 1,55 0 N 2 D 2 2. M <i 

FLD@@902 1,58 I N 2 D 2 2. (Y) (Y) (Y) 

NAME 2,7 I A 30 D 30 30. R = 

ADDR 3,7 B X 30 D 30 8630. R = 

STATE 3,46 B A 4 D 4 4. R - 

FLDO0906 3,56 B N 5 p 3 5. ) - () 


MORE? Y OR N C€ ) 


SUBLIST SCREEN 










FIELD-ID CY,X) 1/0 EXTRNAL INTRNAL RESPN REPLN RANGE COND 
TYP LNGH TYP BYT DIGIT 
FLDOO002 1,58 B N 2 D2 2. CY) CY) CY) 
DEFAULT VALUE: 
99 . 
LOWER TO UPPERCASE TRANSLATION IN EFFECT. 
RANGE:. 
BTW 01-04 
BTW 06-08 
GT 13 






CONDITIONAL VALUES SCREEN 










FIELD-ID (X,Y) I/O EXTRNAL INTRNAL ~RESPN REPLN RANGE COND 
TYP LNGH TYP BYT DIGIT 
FLD@0606 893,56 B N 05 P @3 65.00 0 - (i) 







FIELD IS TO BE DISPLAYED IF INDICATOR 609 IS ON. 

FIELD IS TO BE RETAINED. 

FIELD IS TO BE PROTECTED IF INDICATOR 90@2 IS OFF. 
*(LOWEST PRECEDENCE) - FIELD DEFAULT DISPLAY PROPERTIES: 








INTENSITY: NORMAL | EMPHASIS: 
*(HIGHEST PRECEDENCE) - FIELD DISPLAY PROPERTIES: 
INTENSITY: NORMAL EMPHASIS: R-VIDEO 






WITH OPTION INDICATOR Y 014 
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Appendix C. Function Keys 


The following function keys provide general assistance in using the SFG. 





Function key 1 

Aborts processing of the current function and returns you to the HOME SCREEN. 
Function key 5 

Causes the screen format generator to breakpoint the spool file to a printer. All 
records currently in the spooled printer output are directed to a printer (pending an 
available device). Records added to the spool file after the breakpoint are held until 
a subsequent breakpoint is requested or until the end of the job. 

Function key 13 

Requests help for the user. The SFG will display the appropriate procedures and 
rules that apply to the particular stage of format generation with which you are 
involved. Press function key 14-to terminate the help screen or press the XMIT key 
to receive additional HELP screens. 

Function key 14 

Returns you to normal processing after HELP is displayed. 

Function key 15 

Indicates end of input data. 

Function. key 16 

Indicates input data cannot be entered properly. 


Function key 20 


Restores the screen to its original contents for the current pass if it has 
inadvertently been destroyed. 
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Appendix D. Alphabet Table 


The following table indicates characters considered alphabetic in addition to A-Z, a-z, 
and the space character. 


Denmark and Norway A 
a 6 A 
"y 5C EO 
Ms 7C 6A 
AE 5B 4A 
e 7B CO 





@ . France 





Germany 








Sweden and Finland 





C20, MVO:esemMmbr OMT 
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Appendix E. SFS Support of 
Display Attributes 


Display evict 
Attribute UTS/20D UTS/40D c 
UTS/20 UTS/40 omments 


Display Intensity: 


































































Normal Normal Normal Normal Normal 
intensity intensity intensity intensity 
Alternate Normal Low intensity Low /reverse/ Low intensity Dependent upon 
Brightness intensity normal (See control page 
comment.) setting 
Low Normal Low intensity Low/reverse/ Low intensity Dependent upon 
intensity normal (See control page 
comment.) setting 
Nondisplay Normal Nondisplay Normal Nondisplay 










intensity intensity 





Highlighting: 


















Blink 
character 


Blink field Blink field 


(See comment.) 








Blink Blink field Blink character 
for Katakana 


UTS/20D & UTS/20 











Blink 
character 


Blink field Blink field Blink character 


for Katakana 


Reverse Reverse video 


video 



















Emphasis: 
Underline N/A N/A Underline 
Strike thru N/A N/A Strike thru 
Column N/A N/A Column 






separator separator 





UTS/20D & UTS/20 eo 











wae 
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Appendix F. Sample IMS Action COBOL 
Program for Screen Format 
Services (JAMENU) 


The JAMENU action program processes a password entered as input from the terminal. 
lf the password is valid, JAMENU displays a menu screen using screen format services. 


The operator then chooses the menu number of the action program he needs to 
perform the next operation on his file. If the password he enters is invalid, JAMENU 
displays an error screen and terminates. 


Figure F—1 is a compiler listing of the JAMENU action program. Because this program is 
one in a series of interrelated action programs, note that a special function call section 
(lines 269-363) includes many more calls than JAMENU uses. Including a repertoire of 
these calls in each action program makes them available for any logic used in each 
procedure division of programs in the series. 


Also, in the working-storage section, all screen formats and successor-ids are identified 
enabling the program to reference any one of them, though it does not use all of them. 
This programming technique saves time particularly when a series of action programs 
can succeed differently to each other. 


A flowchart corresponding to the JAMENU action program appears to the left of the 
coding in Figure F—1. Program line numbers in parentheses near the flowchart boxes 
represent the lines of coding that implement the process described. 
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(1-24) 


(25-29) 


(40-50) 


(51-69) 


SCREEN 
FORMAT 
LIST 


SUCCESSOR-ID 
LIST 





Figure F-1. 
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LINE NOe SOURCE ENTRY 


000017 
ocon18& 
uco0i9 
onoo2e 
oco0021 
oo0a022 
000023 
onoo24 
ono025 
oto026 
o00t27 
oonot28 
000029 
onoo30 
000031 
Cn0n32 
oftoo33 
Oonoog34 
000035 
C90036 
079037 
onon3s 
ufolt3s9 
GOCO4D0 
onaca! 
ON0c4%2 
9nco43 
Ococas 
orotaes 
GNGG4#6 
o90rs7 
090048 
0960489 
ofoosec 
000051 
cSors2 
LACS 2 
C7654 
Grass 
o”0056 
o£0657 
u7Crse 
ofQPS9 
wi CO6C 
v"39C62 
GIUN6Z 
crore? 
26764 
grures 
oPonEesb 
3°GT67 
Lf Ghee 
GCCocre? 


GCOIATC ee cesses ee eset es eS ates ese sate seeaeds Kee use Kes eseens shanaceeenene 


oCCrT7ie 
oror7w2s 
GWT. 


OCGCO1 IDENTIFICATION DIVISION, 


“SOURCE -COMPUTE?, 


OBJECT-COMPUTER, 


DATA 


DIVISION. 


WORKING-STORAGE SECTION. 
77) =CUST-FILENAME 
77) «=SCTL-FILENAME 


M1 SCREEN-FORMAT-TOS. 


"5 SF-MENU 

CS SFf-a00l 

CS SF-a0B2 

[CS SF-anp3 

05 SF-CHG)] 

OS SF-CHG? 

05 Sf-CHG3 

SS Sf-DEL1 

MS SF-orS$1 

"& SF-LST1 

"5 SF-wAR! 

95 SF-ERRI1 

05 SF-TERM 

em] VALIC-SuCCFESSOP-19S, 

"eS MENU 

oS CuSsT-ADO 

95 cust-CHG-1 

"5 CcuST-CHG-2 

5S Cust-CH6-3 

5 CustT-DEL 

NS CusT-OISPLAY 

"S CUST-LIST 

C5 WS-ACTIVITY 

Ol WS-TABLES, 

™S PENU-TAGLEe 
lo FILLER PIC 
le FICLLFR PIC 
lo) OCF ILLER FIC 
IS FILLER PYC 
15 FILLER PIC 
lc 0 6OFILLFR PXC 
ro OFILLTR FIC 
ro) 6OFILLER FIC 
lo FILLER PIC 
ro FILLER PTC 

15 MOCNUSTEL REOODFINES 


lo MENU-SEL 
t, MENU-NA“F 
lu MENU-INDO 


X«9) 
x09) 
Xxt9) 
X€9) 
x(39) 
x(9) 
x(9) 
X«9) 
x9) 
xX(9} 


PIC 


UNIT VAC-0S3,. 
UNTVAC-0S3, 


PIC 
PIC 


X¢t7) 
X(T) 


PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 
PIC 


xR) 
x¢8) 
x (8) 
x ce) 
x(8) 
Xa) 
x«8) 
x q¢8) 
x¥(8) 
X¢8) 
x (8) 
x¢@) 
¥¢8) 


PIC 
PIC 
PIC 
PIC 
PIC 
PIC 


X (6) 
X¢6) 
xX (6) 
xX (6) 
X(6) 
X(6) 
X(6) 
X (6) 
x (6) 


PIC 
PIC 


VALUE 
VELUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 


PROCESS SIGNON + MENU, 


VALUF 
VALUE 


VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
ValUe 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 
VALUE 


VaLUrF 
VALUF 
VALUF 
VALUE 
VALUF 
VALUE 
VALUF 
VALUF 
VALUE 


"TW LJAAIOILI NS 
*C2JACHGII®, 
*rFUJACHG2T*. 
*TCHJACHG3SI%o 
""SJANELLIS. 
*AEJADISITI*, 
*"7JALSTIIT%. 
*CAYAWAPIT®. 
*COJAMENUN® 2 
*LUJAMENUT ®, 


MENU-TAPLE (OCCURS if TIMES 
T.TEXYED SY YMENU-TNOKe 


FIC 9t2)e 
PIC X66). 


PIC Xe 


THIS IS THE FRP PROCESSING TABLE FCR RETRIEVING cPP 


MESSASES 


FOOM THE 


: | hiTH THC OVEPLAYy, 
LTCC TE Seabees ees ess SS SSes SHAH SES RES TSHATHESESHEHS SST EHEC as eeeteradenat 


SYSTEM CONTROL FILE FOR DISPLAY 


Sample Action Program JAMENU Using Screen Formats (Part 1 of 6) 





F-2 


g00nd2 

' GNOCOS PROGRAM-ID- JAMENU. 
OPONOS SRE MARKS, 
ONOND S @- <= ~ = oo on wn nw on ww en rw en ne ee nr en et mee weer eee= 
on00cg6s THIS PROGRAM PROCESSES THE SIGNON AND SYSTEM/80 MENU 
YOOCO7* SCREEN FOR THE ENTITLEMENT ACCOUNTING SYSTEM, 
OCCOOSs IF THE SIGNON IS FOUND TO BE VALID, THE MENU WILL BF 
Onoo09* DISPLAVEDe OTHERWISE, THE ERROR OVERLAY SCREEN WILL BF 
oncoicte DISPLAYED AND THE Te&ANSACTION TERMINATED. 
0600] 1@<cceccocescor= Pr en erent ne meter e nent e ene ceroeren= 
000012 
OCOO0L3 ENVIRONMENT OIVISION, 
000014 
000915 CONFIGURATION SECTION, 


*CUSTMST% 6 
"SYSCTLY 


* JAS MENU 
*JASADD! 
*JAGCADDO? 
* JASAPD® 
*JASCHG} 
*JASCHE? 
* JAECHG2 
*JASOFL? 
*JASOTS! 
*JASL ST! 
*JACWAR! 
*JACEPR 

*JACTERM 


* JAMFNL® 
*JAAND?® 


eeoenseeete#tteeeteeeee 
@eeeevstee2s8se 88 ees 8 


*JACHG1*%. 


*JACHG?* 
* JACHG** 
*JADELI® 
*JADTSI* 
*JALST?° 
*JAWARI® 
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UPCCTE FRO-STATUS-TASLE « 
vC0576 1G FILLER 
c30077 VALUE 
UGOC78 
Seoers 
orc06C 
curs} 12 ERE-COnE 

cnacs2 150 TRE-KFY 

Guts? C5 NG-ERR 

GQG084/ 

UCOMBE LINKAGE SECTION. 

CAGOBE 71 PROSFAY-INFOSMATION-PLOCKs 


PIC X44) 
PVISHEOCV] IS LSLSSE4 HTSUS M6 LE*7FIPMC aT LO ON21E7G*e 


DESCRIBE 
ERROR 

(75-84) | sTaTUS CODES 

AND TABLE 


RE-TABLE PEDEFINES ERP-STETUS-TABLE OCCURS 15 TIMFS 
TNDEYCL. RY ERR-INDX. | 





OTC Ge 
PIC XX. 
P2C 99 VALUE 





COPY PIS, 


COPY 


(86) PIB 


COPY 
INPUT 
MESSAGE 
HEADER 


{88) 


DESCRIBE 
INPUT 
MESSAGE 
TEXT 


(89-97) 


SPACE FOR 
FUNCTION CALL 
PARAMETERS 


(98-106) 


SPACE FOR 
RECORD CONTROL 
KEYS AND 
ERROR STATUS 


(107-113) 


SPACE FOR 
DATE AND ERROR 
FLAG VALUES 


(114-122) 


SPACE FOR 
SCREEN RECORD AND 
ERROR TEXT, 
PASSWORD, 





(123-140) 


CUSTOMER AND 
CONTROL RECORDS 


COPY 


(141) OUTPUT 


MESSAGE 
CONTROL HEADER 


Figure F—1. 











C7987 
2359768 
uJ TG78S 
oe Cegr 
e779) 
utul $2 
gob oe 
UTOngs 
coeur SE 
Loul 96 
w"L097 
CPoese 
ur grg9 
w7%G1cCr 
# Clo 
v-G1U2 
brg1g3 
0901904 
G™olto0s 
ocg1ué 
GOCC107 
a¢eg108 
J9C1909 
90011¢c 
occi11 
$*0112 
of°0113 
ono114 
oro1ie 
yOOILE 
0€9117 
090118 
unuiis 
occi1ec 
C00121 
VIC122 
3061223 
070124 
506125 
3°0126 
WO0G127 
Ondgi2e 
G00129 
06013C 


(3ro0r3l 


GPO132 


620133 


o"C134 


ulO135/ 


0°0136 
G20137 
0°0138 
&f0139 
LuPG14se 


cd 


—ocoi4: Cl 


INFUT-“ESSEGE-AREAS 
et IMA-CASS—-le 
15 YIMANHTICE 
10) TRASSIGNON 
lS «TMa-PasSsarRe 


COPY IMA. 


PIC KM). 
PTC x5), 
PIC Xt4&), 


TMA-SCPEFNARET REDFFINES IMA-PASS-1.6 


Lo. “SR=CuUS" =ver 
lo SR-MENU 
1G SRT FESS 
it. -FICeSe 
WOPK-LECA, 
“S IMS-PARAMI TIF LIST, 
lL IMS-FILENAME 
lo OTMS<FETOSSR-ASER 
lu sMS-MEY 


10 IMS-FILE-POSITION 


lo IMS-ALGN 

lu IMS-SCREEN-I10 
1G) SCPEFN-SIZE 
WA-CONTROL-KE Ye 
15 CNTLI 

lo CNTLO-3 


e1Cc 
PIC 
PIC 
PIC 


FIC KUT). 
PIC Xt256)-6 
FIC KdLG), 
PIC XX, 
COMP-4 SYNC, 
PIC Xtf), 


PIC 904) COMP SYNC. 


PIC MCP). 
PIC XG4)de 


12 «CNTL23 RFDEFINES CNIL2-3, 


1S CNTL2 
15 CNTL3 
ERR-STATUS 
REFOPMAT-DATE, 
lu P-MONTH 
13 P-DAY 
16 P-yEAR 
ERP -FLAG 
fe ERR 
8E SEL-ERI 
88 BLP-ERF 
€8 PASSWRI-FRE 
SCFEEN-RECORE. 
le CR-OaTEe 
1G SR-TIMF 
SR-ERR-TEXT 
SG-STAT 
PASSWRDO-FEC. 
19 FILLER 
1G PASSWRD 
1G PASSWRO-SEL 


PIC 9t2de 
PIC KXI2)d6 
PIC 996 


PIC 996 
PIC 99, 
PIC 99-6 
PIC Xe 


VALUE Le ad eos oz 


VALUE *7°*, 
VALUE *3*%, 
VALUE *%4*, 


PIC 9lb)-e 
PIC 946) 6 
PIC KIS), 
PIC KtSde 


PIC KOZ) 
PIC X(&), 
PIC Kt(25)-6 


1S PASSWRO-MENU-SEL REDEFINES PASSWRO-SEL 
PIc X OCCUPS 25 TIMES INDEXED BY PASSWPD-INDOY. © 


lo FILLER 
C5 CUST-RECORE, 


C5 SCTL-RECORD, 


CUTPUT-MESSAGE-APCA, 


PIC X¢?3). 
COPY CUSTMSTe 


COPY SYSCTL. 


COPY OMA, 


Sample Action Program JAMENU Using Screen Formats (Part 2 of 6) 


eH, 
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oro0142 C5 OMA-TEXT PIC X¢%OPO). 
uCO1s?Z 
OCOl4ae CL CONTINUITY-DATA-ARTAe 
oco14s [5 COA-PASSWRD PIc¢ Xt4). 
COO146 “S CDA-PENU-SFL PIC X¢25).4 
DESCRIBE O0g147 C5 COA-PASSWRO-MENU-SEL RENEFINES CDA-MENU-SEL 
(142) INPUT MESSAGE Oocaorss PIC x OCCURS 25 TIMES. 
¢3015¢F 1G COA-CUST-NOR PIC 946)e 
ofo1s! m&§ COA-ACCT-CODE PIC Xt4)- 
CO0152 "5 PASS-FLAG PIC XK, 
vco1s3 88 PASS-THRU VALUE *1°°2°"3°*%u"*S5%, 
GC0154 &8 PACS) VALUrc *1*%,. 
pp eemnals Onolss RE PRSS2 VALUE 2% 
(144-160) PROGRAM TO oP R156 6& PASS? VALUE "3%, 
GCO188 PB PASSS VALUE *S*, 
JrG1s9 C5 COA-STATUS-2YTE PIC Xe 
wlG16t 75 COA-PPCTRAM-NAME PIC X6b)e 
oOG161/ 
O"O162 PROCEDURE DIVISION USING PROGRAM-INF OPM ATTON-PLOCK 
u"0167 INFUT-MESSAGFE-AREA 
7164 WORK~AREA 
LOCUS OUTPUT-MFSSACE-APEA 
ofC166 CONTINUITY-~QATA-8RE Ae 
GOGIO7 MAIN-LCOO SECTION. 
CIG IGOR SHS HS SHH He HHH HHH HH HH Hs HesH HHH SHHHHDEHHE HHH HEHEHE HEHEHE HSHHHEDEOS 
uw%O169e Taf PASS FLAG IN THIS SESTIGN TELLS Tree CROGPAM AT WHICH 
GSCI7*« POINT IMS HAS RETURNEC CONTROL OF THE PROCESSING TO THE 
SCT7GI71e PROGFAM A PASS <2 FLAG PEANS THE PROGPAM HAS ALREADY PUT 
CTtQ172?e OUT THE SCSEEN AND IS NOW FEAGY TO ACCEPT THE NATTA FPO” 
ufGi7zize THAT SCREEN TO PPOCESSe OTHERwISf THE PROGPA” WANTS TO 
OFL1I7T4* OG THE INITIAL PPOCESSINC TCG PUT OUT A SCREENS 
DOL PEMA Fee SHH HSS HH HEHE EHHE HEHEHE HE FEHESHESHHEHEF EHH HEFE SHEESH ESESOHS 
UTOLTE “CMM-FEGIN, . 
INITIATE PROGRAM LOOT? TF NOT PASS? 
BUILD MENU OR CACITE CESFORY LON-INITIALIZE 
(176-233) ERROR SCREEN, yFEI79 IF NO? FRO 
SUCCEED TO Jo G15" PON FOR PLC -SUTLD-SCREEIN 
JAMENU Jrilel ELSE 
STO18s OECFOARM FLAKE RP-"ESSAGCE 
~ O183 Bi 8 
LCcCles PESFORY 25r-PEAL-SCROEEN, 
urules® POESKFORY FL T=-2ETUPN. 
GNLIEF 


LAGS LE Fete He Sete este S HHH SH HHHHHHH HHH FHEHHE HH HEHEHE HEHEHHHE HEH HHEHHHHHOEHHSHS 


LTULEE® INITIALIZATION OF FIFLOS AND FLAGS IS DONE HERE, 
SOCi8S4 ALSD CMECKINS TS JDANF TC SEE IF THE PROGPAM ENTESE® 
uTC19%= FRIY A SIGN C% Ch wAS CALLED FROM ANOTHER PROGRAM, 


STO19}# ONLY IF FNTES FROM A SIGN ON COES THE PROGRAM FETRIEVE 
5761928 THE PASSWORD PECCIDe CTHES WISE IT IS CARRITD TO CHECK 
GMC19T* VALICITY OF MENU SFLECTIONe 


UTC LGUEFEHH HSS SHH HHEE HSH SHE THEE DHE SHH EHDEFHH EF EDES ESE EFE FSO HSEHSE EH LEE EOS 


wOG195 IAHR INTTIALIVE, 


Gra19€ MOVE SPACE TO IMS-KEY 

SPuigoT IMS-FILENAME 
eQulga SR-FRP-TEXT, 
feds beta Ubye one #2 PARSEL KAS: 
GT3201 MOVE CORP P-TRANSACTIGN-DATE TO REFORMAT-DATES 
c7C2G2 TF CDL-PROGPAY-NAME "QUAL LOW-VALUES 

UmO25? MOVE IMA-PASS APL To CNTILZ-3 

Watered ae MOVE "Pw? To CNTLI 

ons2os MOVE SPACE TO IMS-RECORD-AREA 
GN0266 MOVE SCTL-FILENAME TO IMS-FILENAME 
U00207 MOVE wA-CONTS80L-KEY TO IMS-KEY 

090208 PERFORM SO2-GET 

voo2c9 IF ERR 

cno02i0 MOVE *a? TO ERR-FLAG 

900211 ELSE 

000212 MOVE IMS-RECORD-AREA TO PASSWRD-REC 
000213 MOVE PASSURD-SEL TO CDA-MENU-SEL 
070214 MOVE PASSWRD TO CDA-PASSWPDe 
on0215 MOVZ MFNU TO CDA-PROGRAM-NAME 6 
070216 | ; 


Figure F—1. Sample Action Program JAMENU Using Screen Formats (Part 3 of 6) 
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READ AND 
VALIDATE 
MENU 
SCREEN 


(237-244) 


VALIO SELECTION 
SUCCEED TO — 
(248-254) CHOSEN ACTION 
PROGRAM OR 
LOGOFF 


LOGOFF, 
BUILD 
TERMINATION 
SCREEN 


(259-267) 


FUNCTION 
(269-337) CALL 
REPERTOIRE 





Figure F—1. 


DOOZ1 Feo eee sete SoS e SHES HSFEFEE HEHE HHH ESP ESHEHEFHEFHEFEHEEHESEEHEDESHEHHEHOEHESD 
OOO0218s THF MAIN PROCESSING AND SUILODING OF THE SCREEN DATA TS DONE 
ONG2I9* IN HERE. 

CID ASZOSASESH SESH HHH SEH HEHEHE HEHEHE HEE SHE DHEED HEHEHE EFHEFEFEFEH FED EHEFEHEHHEES OH 


GCO221 2ul-FEUILN-SCPEEN. 


ucou222 MOVE IMA-SOURCE-TEOMINAL-ID TO OMA-DESTINATION-TERM=JDo 
0no223 MOVE SF-MENU TS IMS-SCREEN-TDe 
org224 POVE ALL °S° TO SCREEN-RECO?D. 
oro225 MOVE REFORMAT~-CATE TO SR-NATEs 

00226 MOVE P-TYME-CF-DAY TO SR-TIME® 

Gn0227 MOVE 12 TO SCREEN-SIZEe 

0n0228 PERFORM ©C5-BUILD, 

anGg229 IF ERR 

070230 PEREORM 9OG-ERR-MESSASE « 

00023) MOVE MENU TO PIB-SUCCESSOR-Ife 
uUl0232 “Oye °E° T) PIZ-TFRMINATION-IND 
000233 


GYODZ SEUSS SH SESE HHH HEHE SEH HEHEHE ED HSEHEHEHEHHHE HEHEHE HH HEHEHE ESESHHEEHHEHHESEHHEHSHOSD 


OCG235e THE MENU SFLFCTION VALIDITY IS CHECKED HERE 
UNG 2 FERS HE SE SHEE ESHE SE FEF HEHE HEHEHE HHH HIFFHH HEHE HHH SEH EEEHHHH HES Hy 


CN0237 25"-FEAD-SCREEN, 


uIO23A IF COA-PASSWRO-MENU-SEL (SR-”ENU) NOT EQUAL TO *I* 
OCC239 MOVE ‘2° TO ERR-FLAS, 
otuzar If ERR 

3My24]1 PEPFORM SUT-FRR-MESSAGE 

On0242 ELS 

OfG243 PERFORM 267-SET-MENU, 

C0244 


COL ZHE Dee ee Fe FHSS HOHESHEEH HESS EEF EHHEFEFHEFHE FEF HEFESDHEEHHEFEDHEEESEHESHE SHS 


CCG24ée IF MENU SELECTION IS VALIF CONTFGL IS SET FOR NEXT STAGFe 


COL ZH THESES SH EH EEE SE HEE SESH EEHH HEHE EHES EES EH FSH SES HEHE SHED ESHHHESHDS 


CPO24R 2EP-SET-MENUe 


Gfo249 MOVE MEFNU-NA“E (SR-MENU) | TSO PIB-SUCCESSOR-I%. 
Leozsec MOVE MENU-INY (SP-Y%ERNU) TG PIA-TERMINATION-INDS 
occ?s1 MOVE SR-CUST-NER TO CDA-CUST-NoPe 

OFU252 “Ove °re TO PASS-"LAS. 

JOS253 TF SR-MENY = 9 

GCPI9254% PFREOPM 27L-LOSCFF. 

arg275se 


IML SSE BEE OE SEH HEHEHE SHEE OH EE EEE DESH HEHEHE FEOF SEH ESE SHEFF ESEHHHESESESH HH SHSS 
CPG2ZS7e® FUILD TOSMINATTON SCOCEN 
VOC PSE SHE e OSE Se HEH EH HHH EE HHHEDEDE FE HE EE EE HES EFH HEH EEE SHEESH HSHO ESOS OOS 


3™C259 2I°--LOGGFF.e 


cWUM26R MOVE IVYA-SCUSCE-TEOMINAL -ID «TQ OMAKGESTINATION-TERY-TH, 
ocCd261 MOVE SF-TEPM TO IMS-SCRFEN-TD, 
ICC262 MOVE ALL °"* TU SCREEN-RETOOLDS 
CO l26? MGVE CORT PHTRANSACTION-"atTe TO REFORMAT<-CATE © 
G"0264 MOVE FEFORMAT-DATE TO SR-DATES 
Cro26s “Gyl PeTIMF-OF-OAY TO S2-TIME, 
GCO26E6 MOVE 12 TO SCREEN-SIVE« 
GCO2?6” PEPFCR™ SuUf-SUILN. 

Of026°7/ 

iPG759 TME-CALLS SECTIONS 

c-o2707 

o UZ FSO ese This 

wlU2T72 CALL °SETL® USTwS IMS-FILENAMC 
ECO27S IMS--ILE-POSITION, 
BAIPTH EL PHEXIT. 

wl2T7S FXIT. 

uGl276 

SNC2777 “CI-CSETL» 

LOGZTE CALL °ESETIL® : USTNG IMS -FILENAME. 
vee 79 TF © L8-STATyS-CIO”m TS GFESTER THAN % 

Lou23an MOVE "1° T*% FRO-FLAG. 

OFG281 COL-FXIT. 

GNC?B2 EXIT. 

CML83 

CIE2B4 SurH-GeTe 

~ 76°85 CAL Tale 2 USTWE IMS-F ILE AME 

Lf u27BE IMS~RECOPD-APER 
u6287 IMS-KEY, 

gT5288 TF PSP =-STATUS-CCOl IS GFEATSER THAN ® 

GCPCC&9 “COVE "1° TT ERPKF LAGS 


neceer fale! xITs 
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(338-362) 


FUNCTION 
CALL 
REPERTOIRE 





JOO3U7 
OCU308 
C0309 
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TXITe 


Be %eCETUR.S 
CALL °CETLF® USING IMS-FILENAME 
IMS=PECOPO<bSER 
IMS-Ke Veo 
TF PIE-<Teyus-C%O" IS TPCaATeR THaw ” 
“OVE *)° TO FRI-FLAGe. 
Curt kIT © 
FXITe 
FL u-PUT, 
CALL *°PUT*® YSTNG I48-FITLONAME 
IMS -RECORD-AREA, 
IF PF H$STATUS<-COCF TS GREATER TRAN © 
MOVE *1°* TC ERR=-FL as, 
SUO-EXITs. 
ExIT. 


DAO FINS SS SeSeSSeFHSESHHHSSEHHESHE SEH HEHEHE HEHEHE HSHEP HEH SHHHSEHDEHHEHSHESHSHESH SS 


LAD3l1«e 


CALL FOR MAIN SCREFN FOR PPOGRAM 


OPG TL ZA SHOSe Se SESH SHE see SSE HHHEHESESES HH EHH HEH HED HEH HHS SEHE DOS HEDSEHED OSE SS 


000313 
0060714 
C0O0315 
006316 
800317 
u?9318 
090319 
Ono3s2c 
00CG321 
009322 
UCO323 


EUS-RUILDe : 
CALL *AUTLD® USING OUTPUT-“4FSSASE-AOES 
ImS-SCREEN~IOD 
SCPEEN-RE COR 
SCREEN-SIZE 
SG-STAT, 
IF PIB-STATUS-CODS IS GREATER THAN u 
MOVF *3° TO EPR-FLAG. 
SOS-EXIT. 
EXTTe 


COG SZA Se eee se SOSH FOSS HH HOE SESE FEE HEHE HEEDE HEHEHE SEFEFE SEH HEHFESESE OS 


OTG32E¢ 


CALL FOR EPR OVESLAY SCREEN 


DOL ZO SHH ee SoS OSHS HEHE SESE SEH EFEDESEHEH HED EFHHEFEFESEFEESEFESHSSESESS 


U00327 
ull32e 
£00329 
CHO330 
C00731 
YfO332 
0°0333 
OnNG334 
0°90335 
000336 
UAuU337 
ING33e 
006339 
goc3zac 
cco3s4l 
IND 342 
696343 
oCG344 
C7O345§ 
OFO TNE 
030347 
Of°Gzae 
COO349 
onc3so0 
vON0351 
4300352 
000353 
c10354 
o3G355 
390756 
uSuz5s7 
coo7s@a 


SOS-BUILDP-ERRe 
CALL *8urLe*® USING CUTPUT-MESSASE-AGEA 
IMS-SCREEN-ID 
SR -ERR-TEXT 
SCREEN-SIYZE 
SG-STATe 
IF PIE-STATUS-CODE 15 GREATER THAN oO 
MOVE °3° TO ERR-FLAS. 
SLO-BLO-ERP-EXIT. 
EXIT. 


SCO-REFUILD. 
CALL *ERUILC® USING IMS -SCREEN-I10 
IMS -RECORD-AREA, 
SU6-EXITTe 
FXIT. 


SUT-PETUPK.e 

CALL °FPETUFRN®,. 
SCT“EXIT. 

EXTTV.e 


SCE-INSEPT. 
CALL *INSEPT® USING IMS-FILENAME 


IME -RECORD-APEAR 


. INS ~KEYVe 
7F 6 PXB-STATUS-CODS TS GREATER THAN Ff 
MOVE *1° TO ERR-FLAGe 
SCB8-ExITe 
ExtTte 
S99-SNAP. 


Figure F-1. Sample Action Program JAMENU Using Screen Formats (Part 5 of 6) 
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JIPU7S9 MOVE °S* TO PI&E-+TESMINATION-IND, 
O9u76C CALL *SNAP® USING PROGRAM-INFORMATION-BLOCK CDA-STATUS~-BYTF, 
G16361 S9S-EXTT. 
UNG 362 FXIT. 
uUNO%634 
GCPO364 ERPOR-FRCCESSING SECTION. 
Cust Se 
UBL FOEGOSH SHE HEHE HEHEHE HSE SEES EESES HEHE EHH EE HEHESHE HEHE HHH EE EHESED ESOS 
GOCO367e® FRR PROCESSING YS NONE WERE. THF TYPE OF ERP IS 
OTO368* OCTEFMINED AND A SFASCH CF THE ERR TABLE IS mADE 
COC369e THE APPROPRIATE ERP MESSAGE IS RETRIEVED FFOM THE 
GCGC3Te* SYSTEM CCNTROL FILE AND DISPLAY TT ON THE OVERLAY 
UNCSTIe ERP B® IS ILLEGAL P4SS wORPS ERR 9 IS ILLEGAL MENU 
GIGZ72% SELECTION FOR PASSWOPD OTHER FRPS CONFORM TO IMS 
GOGO37T3Ie STATUS LRRORS, 
OTD FINS SESH HSH HEHEHE HEHE HHEEEHEEHE HEHEHE EE HE HEHEHE HHH EHO 4944446544454 44 
SCC3ITS FC X-ERR-MESSAGE , 


GCG376 MOVE SPACE TO IMS-QFCORD-AREA 








BUILD ERROR 
SCREEN AND 
OUTPUT ERROR 
MESSAGE 


(375-401) 


(405-411, TERMINATE 
185) PROGRAM 


Figure F—1. 


wOL?77 
OCU378 


5PU379° 


UNU789 
Jose 
O0C382 
GPC 783 
oCO7B4 
C”™L38§& 
094386 
o70287 
ulto788 
0% 369 
C7u7ge 
of G79) 
UNGZ92 
= Wees 
YEG394 
w U295 
CClG296 
2"0397 
I0U798 
CCG39° 
C7940" 
bro4al 
JCO4 2 
Ceosc?Z 
C7U48oO4 
croeags 
U*UULE 
O°G4uU7 
JCO4ER 
GOOSL9 
wCGair 
Croat 


MOVE SCTL-FILE* ate 
TF PASSwPOCH-ERR 
MVE *5°* 
“OVE @ 
FLEe 
TF SEL=FRP 
“OVE 
FES: 
MCVE PIs-STATUS-CODE 
MOVE °EM* 
MOVE SPACE 
Si.T ERR<-INOX 
ScARCH ESR~TASLE 
AT ENO 
MOVE NCHF RSE 
WHEN EPR-CODE ¢CEFR-IROGKX) IS 
MOYE ETRKEY CERES -INOX ) 
“OVE wA-CONTSOL -—KCY 
PEF FORY SCPKFET. 
MOVE IMS-RECORE-AQFA . 
MOVE ALL *C*® TO SR-ESR-TEXT, 
“OVE SCESR-TIXT 
MOV SFeERO] 
“OVE 5° 
MOVE IMA-SCUTCE-TESMINAL -79 
PECFORM SCE -RUILD-FRE, 
TF PASSS 
PCVE MENU 
MOVE *N® 
FLee 
MCVE MENU 
MOVE °F? 
MOve °° 


TO SCPEENSS TCE « 


IMS-F ILE NAME 
IMS-KE Ve 
TO IMS-FILENAMF, 


TO PASS-FLAG 
TO ERR-STATUS 


TO ERR-STATUS 


TG COR“STATUS» 
TO CNIL1Le 

TO CNTL3.e 

TO Is 


TS CNTL2 

FQUAL TO EPR-STATUS 
TO CNTL2Ze 
TO IMS“KF Ye 


TS SCTL-RECGRDe 


TQ SR-ERQ-TEXT, 
TO IMS=-SCREEN-"TDe 


TD OMAZ-DESTINATION-TFPM-ID, 
TO PIS-SUCCESSOR-IN 

TO PIB-TERMINATION-IND 

TO PIB-SUCCESSOR-ID 


TQ PIB-TERMINATION-IND 
TO PASS~FLAGe : 





Sample Action Program JAMENU Using Screen Formats (Part 6 of 6) 
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The following discussion of the JAMENU action program assumes that you have already 
created a menu screen format called JASMENU and filed it in the screen format file. 
Any line numbers referenced in this discussion refer to the code in the JAMENU action 
program, Figure F-1. Also, expansions of the program information block, input message 
area, and output message area cannot be seen in this listing; however, their fields may 
be referenced in the code (e.g., lines 406 and 407) and are available to JAMENU. 
JAMENU uses two files (lines 22 and 23): 

1. CUSTMST file 

2. SYSCTL file 


The CUSTMST file contains customer information. The SYSCTL file contains four types 
of records: | 


1. Account access records (AA) 
2. Branch records (BR) 
3. Error message text records (EM) 
4. Password records (PW) 
Each type record is identified by a 2-byte control key field. (See lines 108-112 and 
129.) JAMENU accesses the SYSCTL file to validate passwords and retrieve error 
messages for display in the error message screen format. 
JAMENU performs five types of routines. It: 
1. validates passwords; 
builds menu screen; 


2 

3. validates menu selections; 
4. builds error screen; and 

5 


builds termination screen 
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The following general flowchart shows these main routines in the JAMENU program. 


BUILD 
ERROR 
SCREEN 


BUILD 
TERMINAL 
SCREEN 


TERMINATE 
PROGRAM 





NO VALIDATE 
PASSWORD 





YES 







VALIO 
PASSWORD 
? 


VALIDATE 
MENU 







SELECTIONS 








BUILD 





SELECTIONS 


VALID 
? 


MENU 
SCREEN 











RETURN TO MENU 


PASS TO 
SUCCESSOR 







IS 
MENU SELECTION 


LOGOFF 
? 














BUILD 
TERMINATION 
SCREEN 






TERMINATE 
PROGRAM 





JAMENU GENERAL FLOWCHART 


BUILD 
ERROR 


SCREEN 


RETURN TO MENU 
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Begin executing the JAMENU program by entering the transaction code, MENU, 
followed by the password. This is considered the sign-on or first pass through 
JAMENU. 


MENU CP50 


On the first pass, JAMENU accesses the SYSCTL file to validate the password entered 
at the terminal. If the password is valid, JAMENU saves all data pertinent to that 
password in the continuity data area (line 211-216), builds the menu screen (lines 
221-232), and terminates in external succession to itself (JAMENU). Menu screen 
JASMENU follows. | 


FIRST PASS 


06/23/81 06:49:28 — JAMENU 02/09/81 
ENTITLEMENT ACCOUNTING SYSTEM 
SELECT ONE (1) OF THE FOLLOWING OPTIONS: 
1. ADD A NEW CUSTOMER RECORD. 
*2. UPDATE CUSTOMER NAME/ADDRESS INFORMATION. 
*3. UPDATE BRANCH CUSTOMER INFORMATION. 
*4, UPDATE CUSTOMER ENTITLEMENTS. 
*5. DELETE A CUSTOMER RECORD. 
*6. DISPLAY CUSTOMER INFORMATION. 
7. LIST ALL ACCOUNTS (ON THE WORKSTATION). 
8. ENTER WORKSTATION ACTIVITY RECORDS. 
9. LOGOFF SYSTEM. 
*ENTER CUSTOMER NUMBER ------ 
MENU SELECTION: -- 
PLACE CURSOR HERE TO TRANSMIT [-] | 


In the menu screen build routine (lines 221-232), the BUILD function call that actually 
calls the menu screen identifies the buffer address where IMS receives the screen 
format as the output message area (line 314); the format name as IMS-SCREEN-ID (line 
315, defined on line 105); the variable data as SCREEN-RECORD (line 316, defined on 
lines 123-125); the data size as SCREEN-SIZE (line 317, defined on line 106); and, the 
output status as SG-STAT (line 318, defined on line 127). 


Notice, all the parameters you specify on the BUILD function must be defined in the 
work area. 


If the BUILD function is unsuccessful (lines 319 and 320), JAMENU moves an error 
code of 3 to the ERR-FLAG (lines 118 and 121) indicating a build error. 











UP-9977 SPERRY OS/3 F-11 
SCREEN FORMAT SERVICES 


lf the password is invalid on the first pass, JAMENU accesses the SYSCTL file via the 
EM record key for the error message record (lines 380-388), searches an error table to 
find the appropriate error message (lines 390-395), retrieves that error message (lines 
396-398), builds the error message screen (lines 399-404), and terminates in external 
succession to itself (lines 408-411). The password error screen follows: 


PASSWORD IS INVALID. ENTER AGAIN. 





On the second pass through JAMENU, the program tests the menu selection made, to 
see if it is accessible to the password specified in the first pass. If the menu selection is 
valid for that password, JAMENU performs 260-SET-MENU (lines 248-255). This 
moves the correct program name to process the menu selection to the successor-id and 
an | to the termination indicator. 


Notice here that the programmer has set up a menu table (lines 52-62) containing not 
only the menu selection numbers and their corresponding action programs but also the 
termination indicators used to end each action program. The menu is redefined with 
selection numbers (MENU-SEL) in the first two bytes of each table field, the action 
program names are in the next 6 bytes (MENU-NAME), and, finally, the termination 
indicators are in the last byte of each field (MENU-IND). 


When the program moves the successor-id and termination indicator to the program 
information block (lines 248-250), it moves the menu name indexed by the menu 
number entered at the terminal. JAMENU picks up the correct program name for the 
successor-id by using this index value to reference the first two bytes of the menu table 
entry. Likewise, JAMENU moves the termination indicator value to the program 
information block by using the index value to reference the last byte of the menu table 
entry chosen. 


Redefining the menu table (lines 52-68) saves coding by making three types of data 
accessible in one table: the menu selection numbers, action program names for 
successor-ids, and termination indicators. 


If the menu selection is invalid, JAMENU moves code 2 indicating selection error to 
ERR-FLAG (lines 237-241), builds the menu selection error message screen (lines 
375-411), and succeeds externally to itself. 


Several tests occur in the beginning error message building routine. The first separates 
password errors from menu selection errors and function call errors (lines 380-387). 


For a password error, JAMENU places code 5 in the pass flag to force the normal 
termination of the transaction and moves 8 to the work area location, ERR-STATUS 
(lines 380-382). 
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For a menu selection error, JAMENU moves a 9 to ERR-STATUS in the work area (lines 
113, 384, and 385). This code corresponds to one of the values O1 through 10 
contained in the first two bytes of each table entry in the ERR-TABLE. These leading 
two bytes in each table entry also correspond to the index value being used to search 
ERR-TABLE (lines 75-83). Thus, when the value in ERR-STATUS equals the value in the 
first two bytes of an ERR-TABLE entry, JAMENU moves the contents of ERR-KEY (the 
last two bytes in the corresponding ERR-TABLE entry) to the record key area used to 
retrieve that error message record from the SYSCLT file (lines 394 and 395). 


The following diagram illustrates the ERR-TABLE, its index (ERR-INDX), and the way 
JAMENU uses the value in ERR-STATUS to find the ERR-KEY value in the table by 
searching ERR-TABLE for the error code (ERR-CODE) that matches the value in 
ERR-STATUS. 


ERR-STATUS ERR-TABLE (ERR-INDX) 





ERR-CODE ERR-KEY 


JAMENU clears the work-area locations (lines 376-378). It moves the SYSCTL file 
name to the work area file name to prepare for retrieval of the SYSCTL record. This 
record contains the ‘EM’ prefix, the error message number to be sent to the screen, 
and the error message text (line 379). 


To find the appropriate error message corresponding to the password error menu 
selection error, or other function call error, JAMENU searches the table, ERR-TABLE 
(lines 390-395). If it finds no corresponding error code, it moves a message number of 
25 (line 83) to the key field (CNTL-2, line 395) used to call the corresponding record 
from the SYSCTL error message file (lines 396 and 397 and 284-289). 
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lf, for example, JAMENU finds an O9 error code (lines 394 and 395), JAMENU uses 
error message number O02 from the ERR-TABLE (see ERR-TABLE diagram and coding 
line 77) as a key to locate the corresponding error message text in the SYSCTL file 
(lines 102, 107-112, and 396 and 397). 


When JAMENU retrieves the SYSCTL error message (EM) record, it uses this message 
number to locate the error message text immediately following the O02 error number on 
the SYSCTL record. JAMENU then uses this message text in building the error message 
screen. 


Notice in lines 398-404, including lines 327-334, that JAMENU clears the screen error 
text area to receive the error message text from the SYSCTL file; identifies the terminal 
to receive the error message; transmits the message; and terminates in external 
succession to itself. If a build error occurs, JAMENU sets the error flag to 3 and 
succeeds externally to itself. 


If the menu selection including customer number is valid, JAMENU executes another 
short routine (260-SET-MENU, lines 248-254) that passes control to the appropriate 
action program to process the menu selection. This routine also checks for a logoff 
menu selection (9) that builds the termination screen similarly to the way JAMENU built 
the error message screen (lines 259-267). Successor programs selected from the menu 
perform. file operations required. When processing is complete, control returns to the 
-JAMENU program via immediate internal succession and the terminal operator again 
receives the menu screen to enter another selection. 

















& 
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Appendix G. Batch Format Generator 


Instead of using interactive SFGEN, you can use the Batch Format Generator to spool 
one, some, or all of the screen formats in a particular library. Following is the format for 
the Batch Format Generator. Use keyword parameters where necessary. 


_ BFGSPL, ‘oan oo file — 
RV NO SYSEMT 
ae of input | ,EMT=[ XxxXxxXxxx 
RES XXXXXXX. 


where: 


w 








SAVE=YES 
Saves the RUN environment exactly as built for this execution by job control. 


At a later time, this environment may be activated by the SCHEDULE (SC) 
command. 


NOTE: 


The advantage of SC over RUN (RV) is that less processing time is required. 


SAVE=8% 


RUN environment is not saved. This is the default. 


FI=input file name 
Names the user input file, which must be a MIRAM file. 





If no Fl= is specified, defaults to FI=SYS$FMT file. 


VI=vsn of input file 
Names the user input file vsn, which must be a disk. 
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FMT=XxxXxxXXxx 
Spools only a specific screen format where xxxxxxxx is the format name. 


FMT=XXXXXXX. 
Spools screen formats by prefix where xxxxxxx. is the desired prefix. 


FMT=® 
f Spools all formats in a library. This is the default. 


G-2 
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Index 
Term Reference Page Term Reference Page 
A Alternate display properties Appendix E 
3.4.4 3-21 
A character 
indicating alphabetic fields | 1a 2-1 Asterisk (*) character 2.3.2 — 2-3 
indicating alphanumeric fields 2.2 2-2 
Attributes See type 
Action programs attributes. 
BAL 7.3.6 7-38 
COBOL 7.3.6 7-37 
COBOL for IMS Appendix F 
RPG Il 7.3.6 7-36 
Alphabet 
characteristics screen 3.3 3-6 
3.3.2 3-7 
English as default 3.3.2 3-/ 
foreign characters Appendix D 
Alphabetic characters 
error message field 3.4.5 3-22 
foreign Appendix D 
lowercase 3.3.3 3-7 
uppercase 33:3 3-7 
Alphabetic fields B 
default values for dialog screens 3.5.9 3-40 
editing 2.3.1 2-2 B (both), input and output 
4.1.2 4-5 (bidirectional) fields 4.1.3 4-9 
range checking 3.5.8 3-46 
rules 2.2 2-1 BAL 
type attributes 4.1.2 4-6 close a file (CLOSE) 7.3.4.2 7-29 
variable data fields 1.3.2.2 1-9 imperative macroinstructions 7.3.4 7-28 
open a file (OPEN) 7.3.4.1 7-28 
Alphanumeric fields output a record (DMOUT) 7345 7-34 
default values for dialog screens 3.5.9 3-48 retrieve a record (DMINP) 7.3.4.3 7-30 
editing 2.3.1 ta select a screen format 
range checking 3.5.8 3-46 (DMSEL,SCREEN) 7.3.4.4 7-32 
rules 2.2 2-2 
type attributes 4.1.2 4-6 Batch format generator Appendix G 
variable data fields 1:3:2.2 1-9 6.1.3 6-15 
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Term 


Bidirectional fields 
characteristics screen 
conditional display 
conditional protection 
conditional retention 
dialog screen 3 
dialog screen 4 
dialog screen 5 
dialog screen 6 
display retention 
display retention screen 
ESCORT 
IMS 
list screen 
nondisplay screen 
RPG Sl 


SHOW function 
specifying 


See also |/0 fields and variabie 
data fields. 


Blank character 
edit screen 
editing alphabetic and 
alphanumeric fields 
simple insertion in numeric 
fields 


Reference 


3.3.10 
3.9.3 
3.5.6 
3.9.9 
3.0:3 
3.5.4 
3.9.9 
3.5.6 
3.3.10 
3.4.6 
7.3.5 
7.3.6 
6.1.2.6 
3.4.8 
7.3.1 
7.3.6 
6.1.1 
1.3.2.2 
4.1.3 


2.3.4 


2.3.2 
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Page Term 
C 
3-11 
3-38 CD$DDINF +11 error codes 
3-44 DMINP imperative macroinstruction 
3-43 DMOUT imperative macroinstruction 
3-38 DMSEL,SCREEN imperative 
3-4] macroinstruction 
3-43 
3-44 CHANGE 1/0 option 
3-11 modification summary 
3-24 modify screen 
7-35 
7-36 
6-9 CHANGE TEMPLATE ONLY - NO 
3-27 INTERNAL CHANGES option 
7-5 modification summary 
7-36 modify screen 
6-1 
1-10 
4-10 CHANGE TEMPLATE option 


modification summary 
modify screen 


3-19 CHANGE TYPE option 
modification summary 

2-2 modify screen 

2-3 


Characteristics screen 
alphabet (line 4) 
creating new format 


cursor positioning and overwriting 
display retention (line 20) 
erasing and unlocking options 
(lines 10, 11, and 12) 
error message field (line 19) 
error retry counts (line 3) 
function keys (line 21) 
lowercase translation (line 6) 
nondisplayed field (line 11) 
original and overlay formats 
(line 8) 
prompting additional screens 


related optional and dialog screens 


sample format 
Special display control (line 17) 
Special editing characters (line 16) 


CLOSE (close a file), BAL imperative 
macroinstruction 


index 2 


Reference Page 


73.4.3 7-31 
7.3.45 1-35 


7.3.44 1-33 


5.2 5-6 
9.1.1 9-2 
= WES. 9-4 


0:2 9-6 
5.1.1 9-2 
9.1.1.4 9-4 


9.2 5-6 
1! 0-2 
<5 S| 9-3 


9.2 5-6 
9.1.1 9-2 
cae ey 9-4 


3-8 

3-6 
3.4 3-l 
Table 3-1 3-1 
3.4 3-1 
3.5 3-2 
42.1.1 4-] 
3.3.8 3-1 
3.3.7 3-1 


7.3.4.2 7-29 
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®& Term 


COBOL 

connect-free reporting 

data division 

environment division 

function key reporting 

function keys and multivolume 
workstations 

indicators 

interprogram communication 
considerations 

major coding considerations 

procedure division — 

status keys 


Comma 
dialog screen | 
editing input or bidirectional 
fields 
protecting 
simple and fixed insertion in 
numeric fields 


Command keys 


Conditional display dialog 
(dialog screen 3) 


Conditional display properties dialog 
(dialog screen 4) 


Conditional erase/replenish screen 
characteristics screen 


sample format 


use 


Conditional indicators 
conditional values screen 
dialog screens 


display properties 
erase 

error message screen 
list screen 

optional screens 
replenish 

retain 

See also indicators. 


© Conditional protection dialog 


(dialog screen 6) 


Reference 


Table 7-2 
7.3.2.1 
7.3.2.1 
Table 7-3 


7.3.2.3 
7.3.2.2 


7.3.2.4 
7.3.2.1 
7.3.2.1 
Table 7-] 
3.5.1 


1.3.2.3 
3.5.1 


2.3.2 


See function/ 
command key 


screen. 


3.9.3 


3.5.4 


Table 3-1 
3.4.2 
4.2.1 
4.2.1.2 
3.4 

3.4.2 


6.1.2.8 
3.4.1 
3.5 
3.5.4 
3.4.2 
3.4.5 
6.1.2.6 
3.4.1 
3.4.2 
3.5.9 


3.5.6 


SPERRY OS/3 
SCREEN FORMAT SERVICES 


Page Term 


Conditional retention dialog 


7-24 (dialog screen 5) 
7-10 
7-10 Conditional values screen 
/-21 CR character 
7-18 dialog screen 1 
editing rules for signed output 
7-26 fields 
7-10 fixed insertion in numeric fields 
7-11 
7-22 CREATE-FROM function 


characteristics screen 
dialog screen 1 


3-34 home screen 
1-11 modifying formats 
3-35 


new format name 
2-3 old format name and library 


CREATE function 
basic screen format 
characteristics screen 


complex screen format 


3-38 
dialog screens 
3-40 
duplicate lines 
home screen 
3-12 
3-15 new format name and library 
4-12 optional screens 
4-16 
3-12 original formats 
3-15 overlay formats 
pass 1, basic format 
6-12 pass 1, complex format 
3-13 pass 2, basic format 
3-28 pass 2, complex format 
3-40 pass 3, basic format 
3-15 pass 3, complex format 
3-23 screen format — 
6-9 sequence of steps 
3-13 
3-15 Currency sign 
3-43 automatically protected 
edit screen 
editing input or 
3-44 bidirectional fields 


fixed and floating insertion 
in numeric fields 


Index 3 
Reference Page 
3.5.5 3-43 
6.1.2 6-2 
6.1.2.8 6-12 
3.5.1 3-31 
Table 2-1 2-6 
2.3.2 2-3 
3.3.2 3-7 
3.9.1 3-31 
3.2 3-2 
3.2.1 3-3 
9.1 5-1 
5.2 5-6 
3.2.2 3-4 
3.2.3 3-5 
4) 4-1 

3.3 3-6 
41 42 
42 4.12 
42.1 4-12 
3.5 3-29 
42 4-12 
4.2.1.7 4-21 
44 4-29 
3.2 3-2 
41 4-2 
3.2.2 3-4 
3.3.8 3-10 
4.2 4-12 
3.3.4 3-8 
3.3.4 3-8 
43 4-25 
4.1.1 4-4 
4.2.1.4 4-18 
4.1.2 4-6 
4.2.1.5 4-18 
4.13 4-9 
4.2.1.6 4-19 
3.2.1 3-3 
41 4-1] 
2.4 2-6 
3.5.1 3-31 
3.4.3 3-18 
1.3.2.3 1-11 
2.3.2 2-3 
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Term Reference Page Term Reference § Page & 
Cursor D 
characteristics screen 3.6 3-49 
dialog screens 3.5 3-29 DB character 
3.6 3-51 editing rules for signed output 
home screen 3.6 3-49 fields Table 2-1 2-6 
initial 1/0 screen 4.13 4-9 fixed insertion in numeric fields 2.3.2 2-3 
optional screens 3.6 3-51 
positioning, creating a format 3.6 3-49 Decimal point 
positioning, filling in a format | 7.4 7-38 automatic alignment 2.4 2-5 
template screen 41.1 4-4 dialog screen 1 3.9.1 3-34 
type attribute screen 4.1.2 4-] editing input or bidirectional 
fields 1.3.2.3 1-11 
fixed insertion in numeric fields 2.3.2 2-3 
protection 2.4 2-5 
Default values 
characteristics screen 4) 4-2 
4.2.1.1 4-15 
dialog screen 2 3.5.2 3-35 
dialog screen 4 3.5.4 3-40 
dialog screens 3.5.9 3-48 
home screen 3.2.2 3-4 
41 4-2 
42.1.1 4-15 
5.1 5-2 
1/0 screen 4.1.3 4-10 
overwriting 3.6 3-49 
special display 3.5.4 3-40 
DELETE function 
home screen 3.2 3-2 
3.2.1 3-3 
6.2 6-15 
old format name and library 3.2.3 3-5 
use 6.1 6-1 
Device assignment set See DVC-LFD 
sequence. 
Dialog screen 1 
changing 1/0 direction of field 3.5.1 3-31 
default values 3.5.8 3-47 
3.5.1 3-31 
field requesting dialogs 3.5.1 3-30 
function 3.5.1 3-30 
Table 3-2 3-29 
internal length calculated by SFG 3.5.1 3-32 
rules 3.5.1 3-35 
sample format 42.1 4-13 
42.1.7 4-24 
selecting other dialog screens 3.5.1 3-33 
type attributes and |/0 direction 
of field 3.5.1 3-33 
Table 3-3 = 3-34 @ 
type of internal usage 3.5.1 3-31 
warning messages on internal length 3.5.1 3-32 
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Sa spp ir i Py Pt 


Index 5 


© Term 


Reference Page Term Reference = Page 
Dialog screen 2 dialog screen 1 3.5.1 3-30 
alphabetic characters 3.5.2 3-38 dialog screen 2 3.9.2 3-39 
default values 3.5.9 3-48 dialog screen 3 3.5.3 3-38 
3.5.2 3-35 dialog screen 4 3.5.4 3-40 
display of field 3.5.2 3-36 dialog screen 5 3.5.5 3-43 
field response 3.5.2 3-36 dialog screen 6 3.5.6 3-44 
function 3.5.2 3-35 dialog screen 7 3.5.7 3-45 
Table 3-2 3-29 dialog screen 8 3.5.8 3-42 
numeric values 3.5.2 3-37 duplicate lines 44 4-29 
replenished input field 3.5.2 3-35 initiating 4.1.3 4-9 
sample format 42.1 4-12 LIST function 6.1.2 6-2 
4.2.1.7 4-24 range checking 3.5.8 3-46 
warning messages for line 3 3.5.2 3-36 related dialog screens Table 3-1 3-12 
4.2 4-12 
Dialog screen 3 related optional screens Table 3-1 3-12 
default values 3.5.9 3-48 42 4-12 
function 3.5.3 3-38 special display properties 3.5.4 3-40 
Table 3-2 3-25 use 3.5 3-28 
42 4-12 
Dialog screen 4 4.2.1.6 4-19 
conditional display properties 3.5.4 3-40 4.2.1.7 4-2] 
default display properties 3.5.4 3-40 
default values 3.5.9 3-48 Direction of fields 
function 3.5.4 3-40 dialog screen 1 3.5.1 3-30 
& Table 3-2 3-29 list screen 6.1.2.6 6-9 
intensity /emphasis 3.5.4 3-40 RPG Il 7.3.1 7-5 
Table 3-4 3-42 variable data fields 1.3.2.2 1-9 
sample format 4.2.1 4-12 See also 1/0 directions, 1/0 fields, 
42.1.7 4-21 and bidirectional fields. 
Dialog screen 5 Display attributes See display 
conditional retention 3.0-0 3-43 properties. 
3.4.6 3-24 
default values 3.5.9 3-48 Display constants 
function 3.5.5 3~43 display properties 3.4.4 3-20 
Table 3-2 3-29 emphasis 3.4.4 3-20 
format layout 4.1.1 4-4 
Dialog screen 6 intensity 3.4.4 3-20 
conditional protection 3.5.6 3-44 part of screen format 1.3.2.1 1-9 
default values 3.5.9 3-48 protected and unprotected parts 1.3.2.3 1-11 
function 3.5.6 3-44 
Table 3-2 3-29 Display control and error message 
display 6.1.2.3 6-5 
Dialog screen 7 6.1.2 6-2 
default values 3.5.9 3-48 
function 3.5.7 3-45 Display functions 
Table 3-2 3-29 home screen 3.2.1 3-3 
range checking 3.5.8 3-46 LIST 3.2.1 3-4 
3.2.3 3-4 
Dialogs 6.1.2 6-1 
changing field characteristics 5.1 5-1 SHOW 3.2.1 3-4 
characteristics screen selections Table 3-1 3-12 3.2.3 3-5 
& conditional display 3.5.3 3-38 6.1.1 6-1 
conditional indicators 3.4.1 3-13 SPOOL 3.2.1 3-4 
3.5 3-28 3.2.3 3-5 
conditional protection 3.5.6 3-44 6.1.3 6-15 
conditional retention 3.5.5 3-43 use 3.2.1 3-3 
default values 3.5.9 3-48 6.1 6-1 
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Term Reference Page Term Reference Page 
Display properties DMSEL,SCREEN (select a screen format) 
alternate Appendix E BAL imperative macroinstruction 7.3.4 7-27 
conditional 3.5.4 3-40 7.3.4.4 7-32 
default 3.5.4 3-40 CD$DDINF +11 error conditions 
dialog screen 4 3.5.4 3-40 returned 7.344 1-33 
display constants 3.4.4 3-20 
display control and error message Duplicate lines 44 4-29 
display 6.1.2.3 6-5 
error message screen 3.4.5 3.23 DVC-LFD sequence 
fields 3.4.4 3-20 COBOL 7.3.2 7-10 
fields in error 3.4.4 3-20 examples Al A-3 
input fields 3.4.4 3-20 job control 7.2 7-1 
output fields 3.4.4 3-20 
selections Table 3-4 =. 3-42 
special display properties dialog 3.5.4 3-40 
special display screen 3.4.4 3-20 
Display retention 
characteristics screen 3.3 3-6 
3.3.10 3-11 
display retention screen 3.4.6 3-24 
Display retention screen 
characteristics screen 3.3 3-6 
3.3.10 3-11 
field display attributes 3.4.6 3-24 
3.5.4 3-40 
field level display retention 3.4.6 3-24 
3.5.5 3-43 
use 3.4 3-12 
3.4.6 3-24 
DMINP (retrieve a record) 
BAL imperative macroinstruction 7.3.4 7-27 
7.3.4.3 7-30 
CD$DDINF +11 error codes returned 7.3.4.3 7-3) 
DMOUT 7.3.4.3 7-30 
DMSEL 7.3.4.3 7-30 
function keys 7.3.4.3 7-30 
input record size 7.3.4.3 7-30 
response indicators 7.3.4.3 7-30 
variable-length records 7.3.4.3 7-31 
work area 7.3.4.3 7-30 
DMOUT (output a record) 
BAL imperative macroinstruction 7.3.4 7-27 
7.3.4.5 7-34 
CD$DDINF +11 error codes 7.3.4.5 7-35 


error conditions returned 7.3.4.5 7-34 
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Term 


Edit characters 
edit screen 
variable data fields 


Edit mask 
dialog screen 1 
editing input or bidirectional 
fields 
editing numeric fields 


Edit screen 
rules for completion 
special editing characters 
(characteristics screen) 


special editing display 
use 


yen sign for Katakana 


Editing 
alphabetic and alphanumeric fields 
edit screen 
examples 
insertion 
numeric fields 
results 
rules for signed output fields 
special characters 
supression/replacement 
variable data fields 


Editing characters 
initiating dialogs 
input or bidirectional fields 
special 


Emphasis 
alternate display properties 
device support 
dialog screen 4 
display constants 
display property 


error message screen 
fields in error 

input fields 

output fields 

selections 

special display properties 
special display screen 


English, default alphabet 


Reference 


3.4.3 
4.1.2 


3.9.1 


1.3.2.3 
2.4 


3.4.3 


3.3./ 
3.4.3 
6.1.2.2 
3.4 
3.4.3 
3.4.3 


2.3.1 
3.4.3 
Table 2-2 
2.3.1 
2.3.2 

2.4 

Table 2-1 
3.3.7 
2.3.2 
4.1.2 


4.1.3 
1.3.2.3 
3.3.7 
3.4.3 


Appendix E 
Appendix E 
3.5.4 
3.4.4 
3.4.4 
Table 3-4 
3.4.5 
3.4.4 
3.4.4 
3.4.4 
Table 3-4 
3.5.4 
3.4.4 
3.5.4 


3.3.2 


SPERRY OS/3 
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Page Term 


Erase indicator 


Erasing option 


3-18 characteristics screen 
4-6 
conditional erase/replenish screen 
3-30 
1-1] Error message display 
2-4 
Error message field, characteristics screen 
3-18 
Error message screen 
ie characteristics screen 
6-5 display control and error message 
3-12 display 
3-18 emphasis 
3-18 intensity 
sample format 
2-2 use 
3-18 
2-] 
Error retry counts, characteristics screen 
2-4 
2-6 Errors 
3-10 duplicate lines 
2-4 error message display 
4-6 fields in 
function key 
indicated on workstation 
4-] initial 1/0 screen 
1-1] messages (home screen) 
3-1 rules for dialog screens 
3-18 type attribute screen 
type of data 
ESCORT 
3-40 Exclamation point 
3-20 dialog screen 1 
3-20 editing alphabetic and 
3-42 alphanumeric fields 
3-23 editing numeric fields 
3-20 initiating dialogs 
3-20 results of editing 
3-20 type attribute screen 
3-42 
3-40 
3-20 
3-40 
3-7 


Index 7 
Reference Page 
3.4.2 3.15 
3.3 3-6 
3.3.5 3-8 
A.2 A-7 
3.4.2 3-17 
42.1 4-12 
6.1.2.3 6-5 
3.3 3-6 
3.3.9 3-1] 
3.4.5 3-21 
3.3.9 3-11 
6.1.2.3 6-5 
3.4.5 3-23 
3.4.5 3-23 
42.1 4-12 
4.2.1.3 4-17 
3.4 3-12 
3.4.5 3-21 
3.3 3-6 
3.3.1 3-7 
44 4-32 
6.1.2.3 6-5 
3.4.4 3-20 
3.4.7 3-26 
1.3.1 1-7 
41.3 4-10 
3.7 3-51 
3.5 3-29 
4.1.2 4-9 
1.4 1-13 
7.3.5 7-35 
3.5.1 3-33 
2.3.1 2-2 
2.3.2 2-3 
4.1.3 4-10 
2.4 2-4 
4.1.2 4-8 
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Term Reference Page Term Reference Page 
External field length Floating insertion, editing numeric 
defined 2.3.1 2-3 fields 2.3.2 2-4 
editing examples Table 2-2 = 2-7 | 
Q and B counted 2.3.1 — 22 Format See screen 
screen layout 4.1.1 4-4 formats. 
Format display 6.1.2.5 6-7 
Format names 
FSTATUS command 3.2.3 3-5 
home screen 3.2 3-2 
list screen 6.1.2.6 6-/ 
new 3.2.2 3-4 
old 3.2.3 3-5 
summary screen 6.1.2.1 6-3 
FORTRAN 
program using screen formats 733 7-26 
USE SFS statement A.l A-2 
FSTATUS command, existing format names 3.2.3 3-5 
Function/command key display 6.1.2.4 6-5 
6.1.2 6-2 
Function/command key screen 
characteristics screen 3.3.11 3-11 
function/command key display 6.1.2.4 6-6 
function keys Appendix C 
FE use 3.4 3-12 
3.4.7 3-26 


Field change notification Function keys 











dialog screen 7 3.5.7 3-45 
va BAL 7.3.4.3 7-30 
conditional values screen 6.1.2.8 6-12 schavackorchee “Seraail 33 3-6 
Field 1/0 directions See 1/0 directions ease es 
ee ieee COBOL 73.2.3 7-21 
and direction 
of fields dialog screens | 3.5 3-29 
function/command key display 6.1.2.4 6-6 
function/command key screen 3.4.7 3-26 
Field response 
home screen 3.2 3-2 
dialog screen 2 3.5.2 3-35 aes Appendix C 
sublist screen 6.1.2.7 6-10 Ps 
Field type attributes 
CREATE-FROM and MODIFY functions 5.1 5-1 
defined 2.1 2-1 
modify screen 5.1.1.2 5-4 
rules 2.2 2-1 
specifying 4.1.2 4-6 
File specifications form (RPG Il) 7.3.1 7-5 
Fixed insertion, editing numeric fields 2.3.2 2-3 e@ 


Flag, conditional indicator 3.4.1 3-13 
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© Term Reference = Page Term Reference Page 
H I 
HELP function | - for input, initial 1/0 screen 4.13 4-9 
dialog screens 3.5 3-29 
prompting by SFG 1.3.1 1-7 Imperative macroinstructions, BAL See BAL. 
requesting 3.8 3-53 
IMS 
Home screen programming considerations 7.3.6 1-36 
CREATE-FROM function 3.2.1 3-3 sample COBOL program Appendix F 
3.2.2 3-5 
51 5-] Indicators 
52 5-6 BAL 7.3.4.3 7-30 
CREATE function 3.2.1 3-2 COBOL 7.3.2.2 7-18 
3.2.2 3-5 conditional See conditional 
3.3.2 3-7 indicators. 
4j 4-] display retention 3.4.6 3-24 
cursor positioning and overwriting 3.6 3-49 erase 3.4.2 3-17 
DELETE function 3.2.1 3-3 option 3.4.7 3-26 
3.2.3 3-5 7.3.2.2 7-18 
6.2 6-15 protection 3.5.6 3-44 
display functions 6.1 6-1 replenish 3.4.2 3-15 
functions provided by SFG 3.2.1 3-3 response 3.4.7 3-26 
LIST function 32:1 3-4 7.3.2.2 7-18 
3.2.3 3-5 7.3.4.3 7-30 
rd 6.1.2 6-1 retain 3.5.3 3-39 
MODIFY function 3.2.1 3-3 3.5.5 3-43 
3.2.3 3-5 3.5.6 3-44 
| 5] 5-1 RPG ll 3.4.7 3-27 
new format name and library 3.2.2 3-4 special display properties 3.5.4 3-41 
old format name and library 3.2.3 3-5 syntax 3.4.1 3-13 
sample format 42.1.1 4-15 3.9.3 3-38 
SHOW function 3.2.1 3-3 3.5.4 3-4] 
3.2.3 3-5 3.5.5 3-43 
6.1.1 6-1 3.5.6 3-44 
SPOOL function 3.2.1 3-4 
3.2.3 3-5 Initial 1/0 screen 4.1.3 4-9 
| 6.1.3 6-15 
TERMINATE function 3.2.1 3-4 Input data 
6.2 6-15 transfer by screen format 
coordinator 1.2 1-4 
variable data fields 1.3.2.2 1-9 
Input fields See 1/0 fields. 
Input format specifications form 
(RPG tl) 7.3.1 7-5 
Fig. 7-1 7-7 
7.3.6 7-36 
Input record screen 6.1.2 6-2 
6.1.2.9 6-14 
& Insertion editing 
alphabetic and alphanumeric fields 2.3.1 2-2 
3 dialog screen 1 Table 3-2 3-29 
| 3.5.1 3-30 
numeric fields 2.3.2 2-3 











UP-9977 SPERRY OS/3 Index 10 
SCREEN FORMAT SERVICES 











Term Reference Page Term Reference Page 
intensity emphasis 3.4.4 3-20 
alternate display properties Appendix E 3.4.6 3-24 
device support Appendix £ ESCORT 7.3.5 7-35 
dialog screen 4 3.5.4 3-40 field resonse 3.5.2 3-35 
display constants 3.4.4 3-20 FORTRAN 7.3.3 7-26 
display property 3.4.4 3-20 function/command key screen 3.4.7 3-26 
Table 3-4 3-42 IMS 7.3.6 7-36 
error message screen 3.4.5 3-23 initial 1/0 screen 4.1.3 4-9 
fields in error 3.4.4 3-20 intensity 3.4.4 3-20 
input fields 3.4.4 3-20 3.4.6 3-24 
output fields 3.4.4 3-20 LIST function 6.1.2 6-1 
selections Table 3-4 3-42 list screen 6.1.2.6 6-8 
special display properties 3.5.4 3-40 nondisplay screen 3.4.8 3-27 
special display screen 3.4.4 3-20 protected and unprotected parts 1.3.2.3 1-11 
range checking 3.5.8 3-46 
internal field length replenishing value 3.5.2 3-35 
defined 2.3.1 2-3 RPG Il 7.3.1 7-5 
dialog screen | Table 3-2 3-29 SHOW function 6.1.1 6-1 
3.5.1 3-30 special display properties 3.5.4 3-41 
editing examples Table 2-2 2-7 specifying directions 4.1.3 4-9 
O and B not counted 2.3.1 2-2 specifying type attributes and 
results of editing 2.4 2-4 editing 4.1.2 4-6 
type attributes 2.1 2-1 
(/0 directions 2.2 2-2 
bidirectional 4.1.3 4-9 See also variable data fields. 
dialog screen 1 3.5 3-28 
3.5.1 3-30 1/0 screen display 4.1.3 4-9 
duplicate lines 44 4-29 
initial 1/0 screen 4.13 4-9 
input | 4.1.3 4-9 
modify screen 5.1.1 5-2 
output 4.1.3 4-9 
See also bidirectional fields, 1/0 
fields, and variable data fields. 
J 
1/0 fields 
bidirectional See job control 
bidirectional multiple workstations A.2 A-6 
fields. statements 7.2 7-1 
classifications 1.3.2.2 1-9 USE SFS statement Al A-] 
COBOL 7.3.2.1 7-10 
conditional display 3.5.3 3-38 
conditional erase/replenish screen 3.4.2 3-16 
conditional protection 3.5.6 3-44 
conditional retention 3.5.5 3-34 
default value 3.5.2 3-35 
dialog screen 1 3.5 3-28 
3.5.1 3-30 K 
dialog screen 2 3.5.2 3-35 
dialog screen 3 3.5.3 3-38 Katakana 
dialog screen 6 3.5.6 3-44 default currency sign 3.4.3 3-18 
dialog screen 7 3.5.7 3-45 no lowercase translation 3.3.3 3-7 
display properties 3.4.4 3-20 4.1.1 4-5 } 
display. retention screen 3.4.6 3-24 @ 
editing characters 1.3.2.3 1-11 Keys, function See 
editing rules for signed output function 


fields Table 2-1 2-6 keys. 


UP-9977 


Term 


Language, characteristics screen 


Library file (user-assigned) 
DVC/LFD sequence 


modifying formats 


LIST function 
conditional values screen 
display control and error message 
display 
format display 
function/command key display 
home screen 


input record screen 

list screen 

old format name and library 
output record screen 

special editing display 
Sublist screen 

summary screen 

use 


List screen 


Logon procedure 
activating the SFG 
creating screen format 
sample format 


Lowercase translation 
characteristics screen 


range checking 


Low-intensity display . 
protected and unprotected parts of 
screen format 3 
special display screen 





Reference 


3.3.2 


7.2 
Al 
9.1 


6.1.2.8 


6.1.2.3 
6.1.2.5 
6.1.2.4 
3.2 
3.2.1 
3.2.3 
6.1.2.9 
6.1.2.6 
3.2.3 
6.1.2.10 
6.1.2.2 
6.1.2.7 
6.1.2.1 
3.2.1 


6.1.2 
6.1.2 


6.1.2.6 
6.1.2.7 


3.1 


42.1 


3.3 
3.3.3 
3.5.8 


1.3.2.3 
3.4.4 
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Page Term 
Mi 

3-7 Minus sign 

editing rules for signed output 

fields 

7-1 fixed and floating insertion in 
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Term Reference Page Term Reference Page 
N O 
New format name and library, 0 - for output, 1/0 screen 4.1.3 4-9 
home screen 3.2 3-2 
3.2.2 3-4 Old format name and library, | 
home screen 3.2 3-2 
Nondisplay screen 3.2.3 3-4 
characteristics screen 3.3.12 3-11 
use 3.4 3-12 OPEN (open a file), BAL imperative 
3.4.8 3-27 macroinstruction 7.3.4.1 7-28 
Nondisplayed field Option indicators 
characteristics screen 3.3 3-6 COBOL 7.3.2.2 7-18 
3.3.12 3-12 function/command key screen 3.4.7 3-26 
nondisplay screen 3.4.8 3-2) 
Optional screens 
Numeric fields characteristics screen Table 3-1 3-12 
default values for dialog screens 3.5.9 3-48 conditional erase/replenish screen 3.4.2 3-15 
editing 2.3.2 2-3 conditional indicators 3.4.1 3-13 
range checking 3.5.8 3-46 dialog screens Table 3-1 3-12 
rules 2.2 2-1 display retention screen 3.4.6 3-24 
type attributes 4.1.2 4-6 edit screen 3.4.3 3-18 
variable data fields 1.3.2.2 1-9 error message screen 3.4.5 3-21 
 function/command key screen 3.4.7 3-26 
9 character nondisplay screen 3.4.8 3-27 
indicating alphanumeric fields 2.2 2-2 special display screen 3.4.4 3-20 
indicating numeric fields 2.2 2-2 use 3.4 3-12 
Original format, characteristics screen 3.3 3-6 
3.3.4 3-8 
4.) 4-2 
Output data, transfer by SFC 1.2 1-4 
Output fields See |/0 
fields. 
Output format specifications form 
(RPG il) 7.3.1 7-6 
Fig. 7-1 7-8 
7.3.6 7-37 
Output record screen 6.1.2 6- 
6.1.2.10 6-14 
Overlay formats 
advantage 43.1 4-25 
characteristics screen (3.3.4 3-8 
creation 4.3.2 4-28 
SOE character 43.2 4-28 
use 43 4~25 
43.1 4-25 
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@ Term Reference Page Term Reference Page 
Overwriting R 
completing SFG screens 3.6 3-49 
dialog screen 1 3.5.1 3-31 Range checking 
dialog screen 2 3.5.2 3-36 default values 3.5.8 3-4] 
dialog screen 4 3.5.4 3-4] dialog screen 1 3.5.1 3-32 
edit screen 3.4.3 3-18 list screen 6.1.2.6 6-9 
initiating dialogs 4.1.3 4-9 Sublist screen 6.1.2.7 6-11 
1/0 screen 4.13 4-9 
modifying formats §.1.1 5-2 Replenish indicator, conditional/ 
erase replenish screen 3.4.2 3-15 
Replenishing value 
conditional erase/replenish screen 3.4.2 3-15 
dialog screen 2 3.5.2 3-35 
edit screen 3.4.3 3-18 
list screen 6.1.2.6 6-9 
Sublist screen 6.1.2.7 6-11 
Response indicators 
BAL 7.3.4.3 7-30 
COBOL 7.3.2.2 7-18 
function/command key screen 3.4.7 3-26 
RPG Wl 3.4.7 3-27 
© RPG Il 
file specifications form 7.3.1 7-5 
p input format specifications form 7.3.1 7-5 
output specifications form 7.3.1 7-6 
response indicators 3.4.7 3-2/ 
Passes screen formats 7.3.1 7-5 
dialog screens 3.5 3-28 Fig. 7-1 7-7 
a a USE SFS statement Al A-2 
4.2.1 4-12 | 
display constants 1.3.2.1 1-9 RV SFGEN command, activating the SFG 3.1 3-1 
optional screens 42 4-12 
4.2.1.2 4-16 
4.2.1.3 4-1] 
pass 1 - providing the layout 4.1.1 4-4 
| 4.2.1.4 4-18 
pass 2 - specifying type attributes 
and editing 4.1.2 - 
4.2.1.5 4-18 
pass 3 - specifying 1/0 directions 
and initiating dialogs 4.1.3 4-9 
4.2.1.6 4-19 
review 4.1.3 4-]1 
specifying field type 1.4 1-13 
variable data fields 1.3.2.2 1-9 
Plus sign 
editing rules for signed output fields Table 2-1 2-6 
fixed and floating insertion in 
& numeric fields 2.3.2 2-3 
Protected fields 
description 1.3.2.3 -1] 


1-1] 
SHOW function 6.1.1 6-1 
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a 
Term Reference Page Term Reference Page © 
S duplicate lines 4.4 4-29 
edit screen 3.4.3 3-18 
Screen format coordinator erasing option See erasing 
BAL 7.3.4.5 1-34 option. 
COBOL 7.3.2.2 7-18 error and warning messages 3.] 3-51 
conditional erase/replenish screen 3.4.2 3-16 error message field 3.3.9 3-11 
conditional indicators 3.4.1 3-13 error message screen 3.4.5 3-21 
dialog screen 2 3.5.2 3-35 error retry counts 3.3.1 3-] 
dialog screen 5 3:9:0 3-43 format display 6.1.2.5 6-7 
display retention 3.3.10 3-11 function 1.2 1-4 
display retention screen 3.4.6 3-24 Fig. 1-4 1-5 
edit screen 3.4.3 3-19 1.3 1-6 
error message screen 3.4.5 3-22 3.2.1 3-3 
FORTRAN 7.3.3 7-26 5.1 5-1 
function 1.2 1-4 6.1 6-1 
Fig. 1-4 1-5 6.2 6-15 
1.4 1-13 function/command key display 6.1.2.4 6-6 
function/command key screen 3.4.7 3-26 function/command key screen 3.4.7 3-26 
job control 7.2 7-1 function keys 3.3.11 3-11 
option indicators 3.4.7 3-26 HELP function 3.8 3-53 
program considerations 7.3 7-5 help screens Appendix B 
programmer responsibilities 7 7-1 home screen 3.2 3-1 
range checking 3.5.8 3-47 initiating dialogs 4.1.3 4-9 
REPLENISH SCREEN option 3.3.5 3-9 input record screen 6.1.2.9 6-14 
response indicators 3.4.7 3-26 LIST function See LIST 
RPG Il 7.3.1 7-5 function. 
software element of screen list screen 6.1.2.6 6-7 
format services 1.2 1-4 lowercase translation 3.3.1 3-7 
UNLOCK KEYBOARD option 3.3.4 3-8 MODIFY function See MODIFY 
workstation considerations 7.3.2.4 7-26 function. 
7.4 7-38 modifying formats 5.1 5-1 
5.2 5-6 
Screen format generator new format name and library 3.2.2 3-4 
activating 3.1 3-1 nondisplay screen 3.4.8 3-27 
alphabet 3.3.2 3-7 nondisplayed field 3.3.12 3-12 
basic screen formats 4.1 4-] old format name and library 3.2.3 3-5 
characteristics screen 3.3 3-6 optional screens 3.4 3-12 
complex screen formats 4.2 4-12 4.2 4-12 
conditional erase/replenish screen 3.4.2 3-15 original formats 3.3.4 3-8 
conditional indicators 3.4.1 3-13 4] 4-2 
conditional values screen 6.1.2.8 6-12 output record screen 6.1.2.10 6-14 
CREATE function See CREATE overlay formats 3.3.4 3-8 
function. 4.3.2 4-28 
CREATE-FROM function See CREATE-FROM 43.1 4-25 
function. passes See passes. 
cursor positioning and overwriting 3.6 3-49 prompting 1.3.1 1-7 
default values for dialog screens 3.5.9 3-48 sample format 42.1 4-12 
DELETE function See DELETE SHOW function See SHOW 
function. function. 
dialog screens 3.5 3-28 software element of screen format 
42 4-12 services 1.2 1-4 
display control and error message special display control 3.3.8 3-10 
display 6.1.2.3 6-5 special display screen 3.4.4 3-20 
display functions See display special editing characters 3.3.7 3-10 
functions. special editing display 6.1.2.2 6-5 
display retention 3.3.10 3-11 SPOOL function See SPOOL 
display retention screen 3.4.6 3-24 function. 
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@ Term Reference Page Term Reference Page 
Screen format generator (cont) overlay 3.3.4 3-8 
sublist screen 6.1.2.7 6-10 43 4-25 
summary screen 6.1.2.1 6-3 program considerations 73 7-5 
TERMINATE function See TERMINATE program use 7.1 7-1 
function. programmer responsibilities 71 7-1 
unlocking option 3.3.5 3-8 prompting 1.3.1 1-7 
3.4.2 3-16 protected and unprotected parts 1.3.2.3 1-11 
4 4-3 RPG Il 7.3.1 7-5 
4.2.1.1 4-15 sample 42.1 4-12 
SYSRES volume 1.2 1-4 
Screen format services system library ($Y$FMT) 1.2 1-4 
format creation 1.2 1-1 template screen Fig. 4-1 4-4 
format use 1.2 1-] type attribute screen Fig. 4-2 4-] 
interactive component of 0S/3 1.2 1-1 type attributes and editing 4.1.2 4-6 
screen format coordinator (SFG). See screen variable data fields 1.3.2.2 1-9 
format coordinator. 
screen format generator (SFG) See screen SFC See screen 
format generator. format 
software elements 1.2 1-4 coordinator. 
screen formats SFG See screen 
BAL 7.3.4 7-27 format 
basic 4] 4-] generator. 
characteristics screen. See characteristics 
screen. SFS See screen 
COBOL 7.3.2 7-9 format 
complex 42 4-12 services. 
components 1.3.2 7-9 
creating 1.3.1 1-7 SHOW function 
cursor positioning and overwriting 3.6 3-49 home screen 3.2 3-1 
deleting 1.3.1 1-7 3.2.1 3-3 
6.2 6-15 old format name and library 3.2.3 3-5 
3.2.1 3-3 use 3.2.1 3-3 
3.2.3 3-5 6.1 6-1 
dialogs 3.5 3-28 6.1.1 6-1 
display constants 1.3.2.1 1-9 
displaying 1.2 1-1 Signed output fields, editing rules Table 2-1 2-6 
1.3.1 1-7 
duplicate lines 44 4-29 Simple insertion, editing numeric 
error and warning messages 3.7 3-51 fields 2.3.2 2-3 
error indication 1.3.1 1-] cs 
ESCORT 7.3.5 7-35 Slash, dialog screen 1 3.5.1 3-34 
FORTRAN 7.3.3 7-26 
home screen See home SOE character, overlay format 4.3.2 4-28 
screen. 
input 1.2 1-1 Special display control 
job control 7.2 7-1 characteristics screen 3.3 3-6 
layout 1.2 1-4 3.3.8 3-10: 
41.1 4-4 special display screen 3.4.4 3-20 
MIRAM user library 1.2 1-4 
modifying 1.3.1 1-7 Special display screen 
3.2.1 3-3 display control and error 
5.1 5-1 message display 6.1.2.3 6-5 
original 3.3.4 3-8 display properties 3.4.4 3-20 
41 4-1 Appendix E 
output 1.2 1-1 use 3.4 3-12 


3.4.4 3-20 
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Term Reference § Page Term Reference Page 
Special editing characters T 
characteristics screen 3.3 3-6 
3.3.7 3-10 Template screen 
edit screen 3.4.3 3-18 duplicate lines 4.4 4-29 
type attribute screen 4.1.2 4-6 overlay format 4.3.2 4-25 
pass 1 41.1 4-4 
Special editing display 6.1.2.2 6-5 4214 4-17 
6.1.2 6-2 | pass 2 4.1.2 4-6 
4.2.1.5 4-18 
SPOOL function pass 3 4.1.3 4-9 
home screen 3.2 3-2 4.2.1.6 4-19 
3.2.1 3-3 typical Fig. 4-1 4-4 
old format name and library 3.2.3 3-5 
use 3.2.1 3-3 TERMINATE function 
6.1 6-1 home screen 3.2 3-2 
6.1.3 6-15 | 3.2.1 3-3 
use 3.2.1 3-3 
Start of entry character, overlay format 4.3.2 4-28 6.1 6-1 
6.2 6-15 
Sublist screen 6.1.2 6-2 
6.1.2.7 6-10 Transmit all - disregard cursor position 
characteristics screen , 3.3.6 3-10 
Summary screen 6.1.2.1 6-3 summary screen 6.1.2.1 6-3 
Suppression/replacement editing 2.3.2 2-3 Type attribute screen 4.1.2 4-6 
Syntax, indicator Type attributes 
conditional 3.4.1 3-13 defined 2.1 2-1 
dialog screen 3 3.5.3 3-38 duplicate lines 4A 4-29 
dialog screen 4 3.5.4 3-4] format display 6.1.2.5 6-7 
dialog screen 5 3.5.5 3-43 LIST function 6.1.2 6-2 
dialog screen 6 3.5.6 3-44 rules 2.1 2-1 
SHOW function 6.1.1 6-1 
SYSRES volume, storing formats 1.2 1-4 specifying 4.1.2 4-6 
typical screen Fig. 4-2 4-] 
System library ($Y$FMT) : 
home screen 3.2.2 3-4 
storing formats 1.2 1-4 
U 
Underlines 
dialog screen 2 3.5.2 3-35 
edit screen 3.4.3 3-18 
editing numeric fields 2.3.2 2-3 
format layout 4.1.1 4-4 
initiating dialogs 4.1.3 4-9 
input fields 1.3.2.2 1-9 
2.4 2-5 © 
result of editing 2.4 2-4 
type attribute screen 4.1.2 4-8 
variable data fields 1.3.2.2 1-9 
4.2.1.4 4-18 
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_ Term Reference Page Term Reference Page 
Unlocking option W 
characteristics screen 3.3 3-6 
3.3.5 3-8 Warning messages 3./ 3-51 
conditional erase/replenish screen 3.4.2 3-17 
creating basic format 41 4-3 Workstation considerations 
creating complex format 42.1.1 4-16 interprogram communication 7.3.2.4 7-26 
operator 7.4 1-38 
Unprotected fields 
description 1.3.2.3 1-11 
SHOW function 6.1.1 6-1 
Uppercase alphabetical characters, 
translation 3.3.1 3~6 
USE SFS job control statement 7.2 7-1 X 
X character, indicating 
alphanumeric fields 2.2 2-2 
V 
Y 
Variable data fields 
considerations 2.1 2-1 Yen sign, default currency sign 
dialog screens a0 3-28 for Katakana 3.4.3 3-18 
3.5.1 3-30 
display retention screen 3.4.6 3-24 
duplicate lines 44 4-29 
edit characters 4.1.2 4-6 
IMS 7.3.6 7-36 
1/0 direction 4.2.1.6 4-19 
layout 1.3.2.2 1-9 
42.1.4 4-18 
pass 1 41.1 4-4 
4.2.1.4 4-18 
pass 2 4.1.2 4-6 
4.2.1.5 4-18 
pass 3 Ye 4g Z 
protected and unprotected parts ee He d gta saiciaaie replacement 
RPG | 13] 1-5 editing in numeric fields 2.3.2 2-3 
type attributes 2.2 2-1 Faia -charactes 
N12 1-8 editing alphabetic and 
4.2.1.5 4-18 eae 
See also bidirectional fields and , alphanumeric fields: 2.3.2 2-3 
& 1/0 fields. insertion in numeric fields 2.3.2 2-3 
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